I would like to format this so that the parameters and values are 
listed on their own lines.

foreach my $name ( $cgi->param )
{    print "$name\t" . $cgi->param( $name ) . "\n";
}

This part of the script is not executing.

my $file = $cgi->upload( "ad" ) or error( $cgi->p( "No file uploaded." ) );
my $format = $cgi->uploadInfo( $file )->{ 'Content-Type' };

open (TEMP, ">>$tmpdir/tmpfile.fil") or die "Can't find tmpfile.fil";

print TEMP "$format \n";
print TEMP "$file \n";
close(TEMP);
*** Teresa Raymond
*** http://www.mariposanet.com
*** [EMAIL PROTECTED]

Reply via email to