Help for this page
#!/bin/perl use v5.12; ... if (! open my $out_fh, '>', $out) { die "Can't write '$out': $!";
Usage: ./exer_9_2 filename at ./exer_9_2 line 7.