open my $fh,'>',$file_name || die "can't open $file_name for writing: $!\n";

##</code><code>##

open my $fh,'>',$file_name or die "can't open $file_name for writing: $!\n";

##</code><code>##

open(my $fh,'>',$file_name) || die "can't open $file_name for writing: $!\n";