Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -wT
use strict;
...
read (STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
print "Content-type: text/plain\n\n";
print $buffer;
  2. or download this
    #!/usr/bin/perl

...
# now we can send a GET rquest somewhere
$CGI->redirect('http://my.server.com/script.pl?' . $query);