Select Code to Download

use strict;
use warnings;
...
    open my $fh, '<', $fs_name
        or die "Couldn't open '$file': $!";
};