Help for this page

Select Code to Download

Select or download this

open FILE, "< $ARGV[0]" or die "Unable to open file : $!\n"
while (<FILE>) {
  push @{$data[$.]}, split /[\s\t]+/;
}

Select or download this
```
1 2 3 4
5 6 7 8
9 A B C
```