open my $fIN, q{<}, q{msgcount.txt}
   or die qq{open: msgcount.txt: $!\n};