print "Content-type: text/html\r\n\r\n

\n";
if(  ! chdir("~joe/webroot")  ) {
    print "Can't chdir to ~joe/webroot: $!\n";
} elsif(  ! open(TEST,"> hades/emptytest",0777)  ) {
    print "Can't create emptytest: $!\n";
} else {
    close(TEST);
}
print "

\n"; exit(0);