open my $in_fh, '<', $_;

##</code><code>##

open my $in_fh, '<', $_ or die $!;