Select Code to Download

# ...
open my $in, "<", "uuu.txt" or die "cannot open the input file$!";
...
}
close $_ for ($in, $out);
# ... renaming, etc.

perl -i.bak -p -e 's/[0-9\s]//g' uuu.txt