% cat ed.pl

$SIG{WINCH} = \&handler;

sub handler($) {
                print("SIG$_[0] CAUGHT!\n");
}

while( <STDIN> ) {
                print;
}

% perl ed.pl

ALT+Enter
ALT+Enter
ALT+Enter
ALT+Enter

perl **************couldn't send signal 28

-- 
Best Regards,
S.Yoshida [EMAIL PROTECTED]

--
Want to unsubscribe from this list?
Send a message to [EMAIL PROTECTED]

Reply via email to