Your skill will accomplish what the force of many cannot |
|
PerlMonks |
Re: Signal to a sleeping Perl programby choroba (Cardinal) |
on Jan 17, 2020 at 14:33 UTC ( [id://11111523]=note: print w/replies, xml ) | Need Help?? |
What OS is it running in? I gladly forgot most about Autosys after quitting $job - 1. The following runs in Linux and reacts to signals as expected:
A sample session: ▏~ $ 11111522.pl & [1] 28265 5050 Fri Jan 17 15:28:04 2020 Sleeping... Fri Jan 17 15:28:14 2020 Ready! 10100 Fri Jan 17 15:28:14 2020 Sleeping... ▏~ $ kill -USR1 28265 Signal 1 caught. Fri Jan 17 15:28:17 2020 Ready! 15150 Fri Jan 17 15:28:17 2020 Sleeping... ▏~ $ kill -USR2 28265 Bye! [1]+ Done 11111522.pl ▏~ $
map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]
In Section
Seekers of Perl Wisdom
|
|