Rename the perl script (thanks MST)