open my $fh, '<', $filename
    or die "Couldn't open $filename: $!";

for (<$fh>) {