updated shebang on perl script