perl Safe