perl -we "print prototype('CORE::mkdir')" $;$