Cut and pasting your code gives me this output:
-------------------------
C:\Temp>sig4.pl
First wait
Second Wait
continuing on
Third wait
continuing on
-------------------------- 

So, I'm losing the first call for whatever reason.  I thought it might
be an autoflush thing so I turned it on ($|++;), but I still get the
same output.

Bill in Brooklyn

-----Original Message-----
From: Sisyphus [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, May 09, 2006 7:56 PM
To: Ng, Bill; SkyBlueshoes
Cc: [email protected]
Subject: Re: Catch ctrl-c

Nope - can't reproduce that either. The following works fine for me on
build
817 if I hit Ctrl-C:

use warnings;

$SIG{INT} = \&my_handler;

print "First wait\n";
<>;
print "Second Wait\n";
<>;
print "Third wait\n";
<>;

sub my_handler {print "continuing on\n"}
__END__

Hitting Ctrl-C at each pause simply produces:

First wait
continuing on
Second Wait
continuing on
Third wait
continuing on

Cheers,
Rob


_______________________________________________
Perl-Win32-Users mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to