Help for this page
while ($output = <LIST>) { chomp $output; ... $file2 = $output; $file3 = "$output.res"; ...
open (COUNT, "<COMPARE") or die "Can't open COMPARE: $!";