use strict;

open FH, '<', 'filename'; # dies
open my $fh, 'filename';  # dies

no strict 'open';

open FH, '<', 'filename'; # now ok
open my $fh, 'filename';  # now ok