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