open my $fh, '<', 'file.ext' or die "Can't open file: $!";

while (<$fh>) {
    ...
}