foreach $line (<FILE>) 
         {
           chomp $_;