Help for this page
open $my_file, '<', $fn or die "Cannot open $fn: $!\n";
open my $file, '<', $fn or die "Cannot open $fn: $!\n";