Creating Directory with mkdir
!#c:\perl\bin print "Content-type: text/html\n\n"; print "Creating Directory ..."; mkdir("c:/newdir") || die "Directory could not be created ...";