Select Code to Download

perl -i.bak -pe's/old text/new text/g' directory/*.ext

@ARGV == 2 or die "usage: $0 directory extention\n";

...
    print;
    }