perl -e 'use Data::Dumper; print Dumper( \%SIG );'