##
$x = $y or $z;
means
( $x = $y ) or $z;
####
open my $fh, '<', $qfn or die; # ok
open(my $fh, '<', $qfn) or die; # ok (unrequired parens)
open my $fh, '<', $qfn || die; # XXX
open(my $fh, '<', $qfn) || die; # ok
####
open my $fh, '<', $qfn || die;
means
open my $fh, '<', ( $qfn || die );