Select Code to Download

#!/usr/local/bin/perl -w -p -i.bak

...

s/$kill//go;          # remove unwanted strings
s/^\s+//g;            # blank lines

#!/usr/local/bin/perl -w -i.bak

...
    s/^\s+//g;            # blank lines
    print;
}