X-Spam-Check-By:	sourceware.org
Date:	Sat, 28 Apr 2007 12:15:26 +0200
Message-Id:	<679468866@web.de>
MIME-Version:	1.0
From:	Alexander Konig <alex_mammel AT web DOT de>
To:	cygwin AT cygwin DOT com
Subject:	Perl: Carriage Return???
Mailing-List:	contact cygwin-help AT cygwin DOT com; run by ezmlm
List-Id:	<cygwin.cygwin.com>
List-Subscribe:	<mailto:cygwin-subscribe AT cygwin DOT com>
List-Archive:	<http://sourceware.org/ml/cygwin/>
List-Post:	<mailto:cygwin AT cygwin DOT com>
List-Help:	<mailto:cygwin-help AT cygwin DOT com>, <http://sourceware.org/ml/#faqs>
Sender:	cygwin-owner AT cygwin DOT com
Mail-Followup-To:	cygwin AT cygwin DOT com
Delivered-To:	mailing list cygwin AT cygwin DOT com
X-MIME-Autoconverted:	from quoted-printable to 8bit by delorie.com id l3SAHMkX021277

Hello

I am reading O´Reillly´s "Learning Perl" Book and doing the exercises. My version of a test script for regular expression was :

…
while( <INPUT> ){
  chomp;
    if( /$pattern/ ){
      print "\nHit: |$`>$&<$'|";
    }
    else{
      if( !$option ){
        print "\n\nNo Hit >$pattern< in >$_< !";		
      }
    }
}
…

The output for this code is :
< !Hit >fred< in >Frederic

< !Hit >fred< in >Mr.Smith
|it: |Nar>fred<

I cannot imagine what is going wrong with that. Why some parts are just overwritten.
The same code using Active Perl works. Some weeks ago this script has worked using Cygwin, too. 
Then, I wanted to check a regular expression with this script I had to see this weird output. 

Could please someone help me. I really love working with Cygwin when using Windows.

Thanks in advance.

  Alex



_______________________________________________________________
SMS schreiben mit WEB.DE FreeMail - einfach, schnell und
kostenguenstig. Jetzt gleich testen! http://f.web.de/?mc=021192


--
Unsubscribe info:      http://cygwin.com/ml/#unsubscribe-simple
Problem reports:       http://cygwin.com/problems.html
Documentation:         http://cygwin.com/docs.html
FAQ:                   http://cygwin.com/faq/

- Raw text -