home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 49 / cda49.iso / VNULabs / BrownOrifice / BOHTTPD-0.2 / BOHTTPD_download.cgi < prev    next >
Encoding:
Text File  |  2000-08-07  |  874 b   |  30 lines
  1. #!/usr/bin/perl
  2.  
  3. package BOHTTPD_download;
  4.  
  5. use BOHTTPD;
  6. use CGI;
  7.  
  8. my $cgi = new CGI;
  9.  
  10. sub show_download {
  11.   print qq<
  12.     <h3>Download BOHTTPD Source Code</h3>
  13.       <p>By downloading BOHTTPD, you, your children, and your friends are implicitly 
  14.         agreeing to the terms set forth by the
  15.            <a href="/pirate.gif">ClosedSource<sup>TM</sup> License</a>.</p>
  16.     <ul>
  17.       <li><code><a href="BOHTTPD-0.1.tar.gz">BOHTTPD-0.1.tar.gz</a>  [<a href="BOHTTPD-0.1.tar.gz.md5">md5sum</a>]</code>
  18.       <li><code><a href="BOHTTPD-0.1.tar.bz2">BOHTTPD-0.1.tar.bz2</a> [<a href="BOHTTPD-0.1.tar.bz2.md5">md5sum</a>]</code>
  19.       <li><code><a href="BOHTTPD-0.1.zip">BOHTTPD-0.1.zip</a>     [<a href="BOHTTPD-0.1.zip.md5">md5sum</a>]</code>
  20.     </ul>
  21.   >
  22. }
  23.  
  24. print "Content-type: text/html\n\n";
  25. show_header;
  26. show_download;
  27. show_footer;
  28.  
  29. 1
  30.