Perl already provides the mkdir builtin, which works in a platform-independant manner.

As for deleting a directory tree, I suggest using File::Find with the following as the wanted function: sub wanted { unlink }

----
Reinvent a rounder wheel.

Note: All code is untested, unless otherwise stated