C:\>perl -e "if (!-d 'c:/test') {mkdir \"c:/test\";}"

C:\>dir t*
...
 Directory of C:\
09/04/2006  11:26a      <DIR>          TEMP
02/02/2008  10:17p      <DIR>          test
02/02/2008  10:14p      <DIR>          test1
               0 File(s)              0 bytes
               3 Dir(s)  10,945,404,928 bytes free