perl -MErrno -e "print \"ok\""