[cgiapp] Avoiding 'replacing previous run-mode' warning

[Wojciech Pietron <suppressed>]

Hi,

I frequently use $self->prerun_mode() function to change default mode.
I also have my script running with 'perl -w' option. This configuration 
generates a lot of warnings in errorlog like:

[Mon Oct 13 09:49:51 2003] script.cgi: Replacing previous run-mode
'aaa' with prerun_mode 'bbb'.

I want to have logged all the warnings except this one. So
I went through the CGI::Application code and noted, that this message
depends on the $^W value. So I tried to set it in my script. Here you are:

sub cgiapp_prerun {
    my $self = shift;
    [...]

    if ($condition) {
        local $^W=0;
        $self->prerun_mode('bbb');
    }
}

It looks like setting $^W is not the solution. Warnings about replacing still
appears. How can I avoid that message? Has anybody ever faced such 
a problem? I use perl 5.6.0 on Solaris.

Thank you in advance,
Wojciech Pietron

---------------------------------------------------------------------
Web Archive:  http://www.mail-archive.com/suppressed/
              http://marc.theaimsgroup.com/?l=cgiapp&r=1&w=2
To unsubscribe, e-mail: suppressed
For additional commands, e-mail: suppressed