Ng, Bill wrote: > 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.
I just tried it on 811 and I get the same as you for the first execution and then for successive executions I get the extra continuing printout. I'm guessing it's a console window issue - I've encountered similar problems in the past multiplexing input/output to a console window. > From: Sisyphus [mailto:[EMAIL PROTECTED] > > 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 _______________________________________________ Perl-Win32-Users mailing list [email protected] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
