$ perl SIGWARN.pl
$SIG{__WARN__} was set to "IGNORE"! at SIGWARN3.pl line 8.
$