Help for this page

Select Code to Download


  1. or download this
    #!C:\perl\bin\perl.exe -wT
use strict; 
use CGI qw/:standard/; 
my $cgi = new CGI; 
print $cgi->redirect( -uri => 'http://perl.about.com/' );
  2. or download this
    if ($match==1) {
    my $r=new CGI;
    print $r->redirect( -uri => 'http://perl.about.com/' );
}
  3. or download this
    Got the following headers:
HTTP_REMOTE_USER: setheri
...

Status: 302 Found
Location: http://perl.about.com/