open my $fh, '<', $file

##</code><code>##

open(my($fh, '<', $file))