Perl array reference always rewrites over itself in a loop
You only have only two arrays in total. You want one per line, plus @b. my creates a new variable each time it is executed, so you can use the following: my @b; while (<IN>) { my @a = split; push @b, \@a; } By the way, you should always...