$ perl -e'kill SEGV => $$'
Segmentation fault

##</code><code>##

$ perl -e'kill KILL => $$'
Killed