Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!wuarchive!uunet!mcsun!cernvax!chx400!bernina!karrer
From: karrer@bernina.ethz.ch (Andreas Karrer)
Newsgroups: comp.lang.perl
Subject: Re: Perl 4.009 has at least one serious problem
Message-ID: <1991Jun9.134352.12779@bernina.ethz.ch>
Date: 9 Jun 91 13:43:52 GMT
References: <marcl.676377964@cook.ESD.3Com.COM>
Organization: Swiss Federal Institute of Technology (ETH), Zurich, CH
Lines: 15

marcl@ESD.3Com.COM (Marc Lavine) writes:

>The script below should demonstrate a regexp problem that I found when
>running Perl 4.009 on a SparcStation SLC under SunOS 4.1.  Perl was
>compiled with cc.

>print ( ( "A" =~ /^A/i ) ? "okay." : "uh oh...", "\n" );

prints "uh oh...\n" also on a Convex and on DecMipsen. Plus breaks Tom
Christiansen's "man" package, most probably because of this bug. uh oh...
looks like t/op/re_tests needs a few more lines.

+-----------
  Andi Karrer, Communication Systems, ETH Zuerich, Switzerland
  karrer@bernina.ethz.ch                 - terible simplifieur