in reply to Re: How do I tell if strict, taint, etc are on?
in thread How do I tell if strict, taint, etc are on?

Not quite: 
use warnings;
print($^W, "\n");  # 0  XXX

[download]

In Section Seekers of Perl Wisdom