Re^3: Perl suddenly pauses for key input

Perhaps you could add a sig handler to your code. Something like the sig handler here:

#!

use Carp;
use strict;
use warnings;

$SIG{INT}=\&CtrlC;

sub CtrlC {
    $SIG{INT}=\&CtrlC;
    Carp::carp('Caught a CTRL/C');
     };

sub mySub {
    for (1..10) {
        <STDIN>;
         };
     };

    for (1..10) {
        <STDIN>;
         };
    mySub();
    exit;
[download]

When it hangs again, just give it a ctrl/c and see where it carps from.

Comment on Re^3: Perl suddenly pauses for key input Download Code

Replies are listed 'Best First'.
Re^4: Perl suddenly pauses for key input by KHLeow (Novice) on Apr 18, 2009 at 03:55 UTC
vroom: That was quite helpful. However, in Perl 5.8.8 in Windows environment, any attempt to override SIGINT or SIGBREAK will be ignored. Furthermore, my program communicates with another interface, which is old, and must be installed on Perl 5.8.8 to work. I can't upgrade my Perl version to 5.10.0. Anyway, the whole program is actually running within a huge Event-1.10 loop. I've setup a test environment with Perl 5.10.0 installed to experiment with your suggestion, and was letdown when Carp merely reports that CTRL/C was caught at this line: `Event::loop;`	[reply] [d/l]

Replies are listed 'Best First'.

Re^4: Perl suddenly pauses for key input
by KHLeow (Novice) on Apr 18, 2009 at 03:55 UTC

Event::loop;

[reply]
[d/l]