Re: array of arrays

I assume you don't want the first column of each line to be put in the datastructure. If it's something else you want, be more clear. If there's something in your datastructure that you don't want, just don't put it there (untested code):

use strict;
use warnings;
open my $fh, "<", "result" or die "open: $!";
while (<$fh>) {
    my @chunks = split;
    push @AoA, [@chunks[1..$#chunks]];
}
close $fh or die "close: $!";
[download]

Comment on Re: array of arrays Download Code

Replies are listed 'Best First'.
Re^2: array of arrays by Anonymous Monk on Jul 28, 2011 at 13:06 UTC
thank you so much.but a question for learning! where is shift?! how did you do this? i mean how did you omit the first element?	[reply]
Re^3: array of arrays by moritz (Cardinal) on Jul 28, 2011 at 13:12 UTC
My suggestion would have been `shift @chunks; push @array, \@chunks;` [download] Instead of the shift, JavaFan used a slice, `@chunks[1..$#chunks]`. which returns a list of all execpt the first element. There's more than one way to do it. Perl 6 - second systems done right	[reply] [d/l] [select]