Mailing-List: contact cygwin-help AT sourceware DOT cygnus DOT com; run by ezmlm List-Subscribe: List-Archive: List-Post: List-Help: , Sender: cygwin-owner AT sources DOT redhat DOT com Delivered-To: mailing list cygwin AT sources DOT redhat DOT com From: e DOT j DOT pronk AT philips DOT com To: Cc: Subject: Re: perl 5.6.1 bug report Message-ID: <0056890029702585000002L952*@MHS> Date: Thu, 17 May 2001 10:07:20 +0200 MIME-Version: 1.0 Content-Type: text/plain; charset=iso-8859-1; name="MEMO 05/17/01 10:05:27" Content-Disposition: inline Content-Transfer-Encoding: 8bit X-MIME-Autoconverted: from quoted-printable to 8bit by delorie.com id EAA11272 neillunn AT gunz DOT com DOT au wrote: > > > > > while ( $input =~ /(.*?)#/gsm ) { > Actually it should be right in all perl 5.6.1 builds. Which leads me to say > that I am actually not sure which one is the bug, but it is not a "cygwin" > bug. > Someone please correct me if I'm wrong on this but I thought (*?) with /s as > a modifier would never match more than once. In fact, try the same string > with no newlines and it should only match once. This is from perlfaq6 - Regexes : ===== I'm having trouble matching over more than one line. What's wrong? Here's code that finds everything between START and END in a paragraph: undef $/; # read in whole file, not just one line or paragraph while ( <> ) { while ( /START(.*?)END/sm ) { # /s makes . cross line boundaries print "$1\n"; } } ===== Eddy -- Want to unsubscribe from this list? Check out: http://cygwin.com/ml/#unsubscribe-simple