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