perl -pi -e 's{^#!\/.*?$}[#!\/usr\/bin\/perl];' *.pl