Select Code to Download

perl -i.bak -pe 's/pattern/replacement/'

#!/usr/bin/perl 

...
    s/pattern/replacement/; 
    print;
}