Help for this page

Select Code to Download


  1. or download this
    <html>
<body>
...
</form>
</body>
</html>
  2. or download this
    #! /usr/bin/perl/bin/perl -wT

...

# Erase the .tar file from the server
File::Temp::unlink0($fh, $filename) or die "Error unlinking $filename 
+safely";
  3. or download this
    print $q -> start_html,
      $q -> a ( "$filename", $filename ),
      $q -> end_html;