develooper Front page | perl.perl5.porters | Postings from March 2001

Re: 9122 and sigaction/switch on HP-UX 11.00

Thread Previous | Thread Next
From:
H . Merijn Brand
Date:
March 14, 2001 06:01
Subject:
Re: 9122 and sigaction/switch on HP-UX 11.00
Message ID:
20010314145339.C007.H.M.BRAND@hccnet.nl
On Wed, 14 Mar 2001 10:35:21 +0100, "H.Merijn Brand" <h.m.brand@hccnet.nl> wrote:
> --- 43,50 ----
>         if($bad) { print "not ok 1\n" } else { print "ok 1\n"}
>   }
> 
> ! if($oldaction->{HANDLER} eq 'DEFAULT' or
> !    -t STDIN && $oldaction->{HANDLER} eq 'IGNORE'))

   s/\)\)$/)/

Damn I *hate* those typos :-)

>     { print "ok 2\n" } else { print "not ok 2\n"}
>   print $SIG{HUP} eq '::foo' ? "ok 3\n" : "not ok 3\n";

-- 
H.Merijn Brand           Amsterdam Perl Mongers (http://www.amsterdam.pm.org/)
using perl-5.005.03, 5.6.0, 5.6.1, 5.7.1 & 623 on HP-UX 10.20 & 11.00, AIX 4.2
   AIX 4.3, WinNT 4, Win2K pro & WinCE 2.11 often with Tk800.022 &/| DBD-Unify
ftp://ftp.funet.fi/pub/languages/perl/CPAN/authors/id/H/HM/HMBRAND/


Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About