Help for this page

Select Code to Download


  1. or download this
    my $url =qq(http://server1.xxx.yy.zz/cgi-bin/server1.pl?id=$id);
    $page->redirect($url);
    
  2. or download this
    my $session_dbh = DBI->connect('dbi:Pg:dbname=xyzzy') or die $DBI::err
    +str;
    my $id = $page->param('id');
    my $session = CGI::Session->new("driver:PostgreSQL", $id, {Handle=>$se
    +ssion_dbh});
    my $currid = $session->id();