Warnmodus abfrage

[alex]

Hi Leute,

folgender Code:

__CODE__

#!/usr/bin/perl -w

use strict;
use warnings;
use CGI qw/:standard :cgi-lib/;

print header();
print start_html();
print "Warnings: " . $^W;
print end_html();

exit(0);

__CODE__

Nun meine Frage:
wieso liefert mir das in der shell eine 1 und im Browser eine 0 ?

Und: Wie kann ich das im Browser abfragen?

[Struppi]

Nun meine Frage:
wieso liefert mir das in der shell eine 1 und im Browser eine 0 ?

Bei mir gibt das immer 1.

....

Ich hab mal in Perldoc geschaut was $^W eigentlich ist:
$^W

The current value of the warning switch, initially true if -w was used, false otherwise, but directly modifiable. (Mnemonic: related to the -w switch.) See also the warnings manpage.

Ich vermute auf deinem System wird der -w Switch ignoriert (ich kann mir zwar nicht erklären warum, aber das würde das Verhalten erklären)

Und: Wie kann ich das im Browser abfragen?

Was willst du den Wissen?

Struppi.

[alex]

na ich will mein modul warnungen ausgeben lassen mit carp, allerdings nur wenn der warnmodus aktiviert wurde. stand so im kochbuch, funzt bei mir aber komischerweise nicht im browser...

vielleicht liegts an dem ganzen mod_perl krams den ich installiert habe...

thx, alex