Select Code to Download

print "Location: http://www.mydomain.com/cgi-bin/index.cgi?sid=$sid\n\
+n";

my $sid = $cgi -> param('sid') || undef; # retrieve session id from qu
+ery string
    my $session = new CGI::Session("driver:File", $sid, {Directory => 
+'/home/mysite/public_html/tmp'});
...
        print "Location: http://www.mysite.com/cgi-bin/authentication_
+error.cgi\n\n";
        exit;
    }