On Wed, 2004-04-07 at 17:03, Jeremy Silva wrote:
>    use CGI;
>    my $counter;
>    my $cgi;
>    sub run{
>      print "Content-type: text/plain\r\n\r\n";
>       print "HERE";
>       
>       $counter = 0;
>       $cgi=null;

You don't need to do this.  Just pass the CGI object to your sub:

my $cgi = CGI->new();

run($cgi);

sub run {
    my $cgi = shift;
    # do something with $cgi
}

Also, be sure that you are using the latest version of CGI.pm.

- Perrin


-- 
Report problems: http://perl.apache.org/bugs/
Mail list info: http://perl.apache.org/maillist/modperl.html
List etiquette: http://perl.apache.org/maillist/email-etiquette.html

Reply via email to