while (<MYINPUTFILE>) {
   my($line) = $_;
   chomp($line);