Select Code to Download

#!/usr/bin/perl -w -i.bak
$regexfile = shift @argv;
...
      s/$a/$b/og;
   }
}

#!/usr/bin/perl -w
$regexfile = shift @argv;
...
      $regex;
   }
}