Select Code to Download

#!/usr/bin/perl

...
print "listen: @listening_ret\n";
print "run: @running_ret\n";

C:\test>junk79
still running...
...
SIGNAL HEARD! STOP RUN()
SIGNAL HEARD! STOPPINGlisten: 1
run: 1