Beefy Boxes and Bandwidth Generously Provided by pair Networks RobOMonk
more useful options
 
PerlMonks  

Re^3: Splitting multiline scalars into different array entries

by broquaint (Abbot)
on Aug 05, 2005 at 11:23 UTC ( #481198=note: print w/ replies, xml ) Need Help??


in reply to Re^2: Splitting multiline scalars into different array entries
in thread Splitting multiline scalars into different array entries

Ah yes, it seems I missed the transposition.

use Algorithm::Loops 'MapCar'; my @results = map { grep(/\n/,@$_) ? MapCar {[@_]} map([split "\n"], @$_) : $_ } @AoA;
And to be sure:
use Test::More tests => 1; my @AoA = ( [qw/single cell values/], [qw/are really easy/], [ "but\nmultiline\nstilton", "these\ncells\nis", "aren't\nsuck\ngreat" ], [qw/back to life/], [qw/back to reality with more cells/] ); my $desired = [ [ 'single', 'cell', 'values' ], [ 'are', 'really', 'easy' ], [ 'but', 'these', 'aren\'t' ], [ 'multiline', 'cells', 'suck' ], [ 'stilton', 'is', 'great' ], [ 'back', 'to', 'life' ], [ 'back', 'to', 'reality', 'with', 'more', 'cells' ] ]; use Algorithm::Loops 'MapCar'; my @results = map { grep(/\n/,@$_) ? MapCar {[@_]} map([split "\n"], @$_) : $_ } @AoA; is_deeply \@results, $desired, "The arrays match!";
HTH

_________
broquaint


Comment on Re^3: Splitting multiline scalars into different array entries
Select or Download Code
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.
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.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://481198]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others having an uproarious good time at the Monastery: (8)
As of 2014-04-20 14:43 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    April first is:







    Results (485 votes), past polls