my $handle = $cgi->param('Filedata'); while (<$handle>) { print STDERR $_ }