in reply to Too much text

You may assign a subroutine to $SIG{INT} that aborts the process after a certain screen. This subroutine will be rn each time ^c is pressed
$SIG{INT} = sub { print "recieved SIGINT. Help!!\n"; }
-- slurp