in reply to PID of signal sending process

What you need is the si_pid slot from the siginfo_t structure, not directly available from Perl.

The topic has been discussed here before: siginfo.