Test/TestUpload.html

   1 <HTML>
   2 <HEAD>
   3 <META NAME="ROBOTS" CONTENT="NOFOLLOW">
   4 <META CONTENT="text/ssperl; CGI=`$INPUTFILE $DEBUG='NO' $METHOD=POST`">
   5 <TITLE>Test File Upload</TITLE>
   6 </HEAD>
   7 <BODY>
   8 <H1 ALIGN="CENTER">Test File Upload</H1>
   9
  10 <p>
  11 Test the file upload of CGIscriptor.
  12 </p>
  13
  14 <h2>Please select a file</h2>
  15 <FORM METHOD="<SCRIPT TYPE="text/ssperl">"$METHOD"</SCRIPT>" ACTION="TestUpload.html" ENCTYPE="multipart/form-data">
  16 <p>
  17 supply your own text file <INPUT TYPE="file" NAME="INPUTFILE" ACCEPT="text/plain">
  18 </p>
  19
  20 <input TYPE='SUBMIT' NAME='SUBMIT' VALUE='RUN'>
  21 <INPUT TYPE='RADIO' NAME='METHOD' VALUE='POST' <script TYPE="text/ssperl">'CHECKED' if $METHOD eq 'POST'</script>> POST
  22 <INPUT TYPE='RADIO' NAME='METHOD' VALUE='GET' <script TYPE="text/ssperl">'CHECKED' if $METHOD ne 'POST'</script>> GET<br>
  23 </FORM>
  24
  25
  26 <hr>
  27 <pre>
  28 <SCRIPT TYPE="text/ssperl">
  29 if($INPUTFILE)
  30 {
  31     print STDOUT "<pre>$INPUTFILE</pre>"
  32 }
  33 else
  34 {
  35         print STDOUT "No input\n";
  36 };
  37
  38 "";
  39 </script>
  40 </pre>
  41 </BODY>