move perl specific commands out of perforce block