my $line = <$filehandle>; chomp $line;