Help for this page
comm -13 file1 file2 > file3
open FIRST,"file1" or die "$!: file1\n"; open LAST,"file2" or die "$!: file2\n"; ... close LAST; print NEW $n2{ $col1 } for my $col1 ( sort keys %n2 ); close NEW;