$ perl -MData::Dumper -E 'say "$_ => $SIG{$_}" for sort {$a cmp $b} keys %SIG'

#snip much the same as above, except for...

__WARN__ =>