sub get_cgi_query { my %cookies = CGI::Cookie->fetch; my $hook_id = $cookies{CGISESSID}->value unless !defined($cookies +{CGISESSID}); if (defined($hook_id)) { return CGI->new(\&hook,$hook_id); } else { return CGI->new(); } }
In reply to Re^2: CGI.pm, passing query params to upload hook
by rocku
in thread CGI.pm, passing query params to upload hook
by rocku
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |