home *** CD-ROM | disk | FTP | other *** search
/ Internet 1996 World Exposition / park.org.s3.amazonaws.com.7z / park.org.s3.amazonaws.com / Pavilions / BrainOpera / cgi-bin / text / whoami.cgi < prev   
Text File  |  2017-09-21  |  562b  |  33 lines

  1. #!/usr/local/bin/perl
  2.  
  3. # This script looks at the cookies
  4.  
  5. do "/web-cgi-bin/cookies.pl";
  6. do "/web-cgi-bin/cgi-hacks.pl";
  7.  
  8. require 'flush.pl';
  9.  
  10.  
  11. &get_cookies();
  12. $name=&get_variable($HTTP_COOKIE,"name");
  13. $email=&get_variable($HTTP_COOKIE,"email");
  14. print "Content-type: text/html\n\n";
  15. &flush(STDOUT);
  16.  
  17.  
  18.  
  19. print "<HEAD><TITLE>Who you are</TITLE></HEAD>
  20. <BODY>
  21. <center><h1> Who you are</h1>
  22. <hr size=3>
  23. Your name : $name<hr>
  24. Your email : $email<hr>
  25. </center>
  26. <a href=\"/test/\">Go Back to the Test Page</a><hr>
  27. <address>benjamin@media.mit.edu</address>
  28. </body>
  29. ";
  30.  
  31.  
  32.  
  33.