($dir,$folder)=split(/&/,$param1);
$DIR=$dir.$folder;
mkdir($DIR,0755);
chmod(0755,"$DIR");
print "Set-Cookie: Current_Dir=$dir;path=/\n";
print "Content-type: text/html\n\n";
print qq~<script language=javascript>alert("$com_folder $folder $com_created");parent.pad.location="$url_to_editor?path_tree=$dir=saveas"</script>~;
1;