Help for this page
use strict; use warnings; ... for my $key (keys %stuff) { print "$key @{$stuff{$key}}\n"; }
$ cat file1 Adam 1 2 3 ... $ ./merge.pl file1 file2 Adam 1 2 3 4 5 6 Eve 4 5 6 7 8 9