I just had this problem last night on my shared server. The server has an
older version of CGI::App installed, which apparently doesn't support the
method you & I use - the string name of the method to run. Check and see if
you are using the latest version of the module. That was my problem. I
added a local copy & made sure it was in @INC and all was well.
Drew
At 11:41 AM 2/28/2002 -0500, Sabherwal, Balvinder (MBS) wrote:
>Guru's
>
>I am getting the following error in oneof my scripts. Any ideas as why??
>
>[Thu Feb 28 11:34:00 2002] pm_metadata_push.cgi: Can't use string
>("showsrvrs") as a subroutine ref while "strict refs" in use at
>/usr/local/ActivePerl-5.6/lib/site_perl/5.6.1/CGI/Application.pm line 90.
>
>
>pm_metadata_push.cgi
>****************************
>#!/usr/local/ActivePerl-5.6/bin/perl
>push(@INC,'/var/apache/cgi-bin');
>use pm_metadata_push;
>my $webapp = "metapush"->new();
>$webapp->run();
>***********************************
>
>pm_metadata_push.pm
>****************************
>package metapush;
>use base 'CGI::Application';
>use strict;
>
> sub setup {
> my $self = shift;
> $self->start_mode('mode1');
> $self->run_modes(
> 'mode1' => 'showsrvrs',
> 'mode2' => 'runshell',
> 'mode3' => 'addsrvr'
> );
> }
======================================================================
Drew Taylor JA[P|m_p]H
http://www.drewtaylor.com/ Just Another Perl|mod_perl Hacker
mailto:[EMAIL PROTECTED] *** God bless America! ***
----------------------------------------------------------------------
Speakeasy.net: A DSL provider with a clue. Sign up today.
http://www.speakeasy.net/refer/29655
======================================================================
---------------------------------------------------------------------
Web Archive: http://www.mail-archive.com/cgiapp%40lists.vm.com/
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
