$SIG{TERM} = sub {
  print "my bad\n";
  exit 0;
};

kill TERM, $$;

__output__

my bad