File Perl

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