Re^2: INT signal kills process run with expect, when $SIG{'INT'} is set

On many platforms sleep will exit on any signal, including SIGINT. You need to place it in a loop. For example:

use warnings;
use strict;

$SIG{'INT'}=sub {print "Clive Darke rules!\n";};

while (1) {
    sleep 10000;
}
[download]

Comment on Re^2: INT signal kills process run with expect, when $SIG{'INT'} is set Download Code