Interrupt Handling - What am I doing wrong?

Select or download this

#!/usr/bin/perl
use strict;
...
    print "\n\nNo critical tasks are running... it\'s safe to terminat
+e now...\n";
    print "Terminating Program!!!\n";
}

Select or download this

sleep 60 ;

Select or download this

No critical tasks are running... it's safe to terminate now...
Terminating Program!!!

Select Code to Download