in reply to Some automation on Perlscripts?
for f in *; do (echo '#!/usr/bin/perl'; echo 'use strict;'; echo 'use warnings;'; + (tail +2 $f | grep -v 'use strict' | grep -v 'use warnings')) > $f.$ +$; mv $f.$$ $f; chmod +x $f; done [download]