open, $FH, "<whatever.txt";
for (<$FH>) {
    chomp;
    ...
}