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