Select Code to Download

my $mask_input = <INPUT>;

...
...
    
print OUT "$mask_input";

chomp( my $mask_input = <INPUT> );
my $new_mask = 'N' x length $mask_input;
...
    
print OUT "$new_mask\n";