my $fh = $cgi->param('File name'); while (<$fh>) { print $_ }