#! /usr/local/bin/perl ################################# # # # WeddingPlanner CGI # # # # Written by Zach Whalen -- # # (zwhalen@english.ufl.edu)# # # # Copyleft Zach Whalen 2003 # # You can use this program if # # you want to. Just don't try to# # Copyright it yourself, please.# # # ################################# ### SUMMARY ### # # This is part of a script which helps you # keep up with addresses and other related # information when you're planning a wedding # (or conference). # alarm(30); use strict; require '/web/nwe/share/nwe.pm'; print "Content-type: text/html \n\n"; my %data = &Parse_web_data(); my $file = $data{'file'}; unlink $file; print <

$file

The file was successfully deleted!

View all of your files.

Enter a new file.

END_OF_HTML exit;