Re: Splitting multiline scalars into different array entries

use Data::Dumper;

## your @AoA here ...

my @results = map {
  grep(/\n/, @$_)
    ? map([split "\n"], @$_)
    : $_
} @AoA;

print Dumper( \@results );
[download]

If you want to update the original data just change the my @results = to @AoA =. Also you could use Scalar::Util::first there instead of grep if you're looking for an optimal solution.

HTH

_________ broquaint

Comment on Re: Splitting multiline scalars into different array entries Download Code

Replies are listed 'Best First'.
Re^2: Splitting multiline scalars into different array entries by davis (Vicar) on Aug 05, 2005 at 11:15 UTC
Hmmm... that was my first result. See my desired output. Thanks anyway! davis Kids, you tried your hardest, and you failed miserably. The lesson is: Never try.	[reply]
Re^3: Splitting multiline scalars into different array entries by broquaint (Abbot) on Aug 05, 2005 at 11:23 UTC
Ah yes, it seems I missed the transposition. `use Algorithm::Loops 'MapCar'; my @results = map { grep(/\n/,@$_) ? MapCar {[@_]} map([split "\n"], @$_) : $_ } @AoA;` [download] And to be sure: Read more... (1342 Bytes) HTH `_________ broquaint`	[reply] [d/l] [select]
Re^4: Splitting multiline scalars into different array entries by davis (Vicar) on Aug 05, 2005 at 11:29 UTC
broquaint: Thank you very much. I had just seen frodo's link, and was struggling with MapCar myself. That's exactly what I was after. davis Kids, you tried your hardest, and you failed miserably. The lesson is: Never try.	[reply]
Re^4: Splitting multiline scalars into different array entries by Anonymous Monk on May 15, 2012 at 05:40 UTC
i wanna split a file which has 3 char and all 21 values in a single line ie each char has 7 values.so i need to split it as 7 in each line by input file.	[reply]


Problems? Is your data what you think it is?
	PerlMonks