Help for this page

Select Code to Download


  1. or download this
    $cookie =$cgi->cookie(
                          -CGISESSID => $session->id,
    ...
                          -domain => 'B2R6A056a'
                          };
    print $cgi->header(-cookie=>$cookie);
    
  2. or download this
    my %cookie = fetch CGI::Cookie;
    foreach $keys ( sort keys %cookie)
    {
            print "$keys : $cookies{$_}";
    }