Re: Zmienna w operatorze s///

Article View: pl.comp.lang.perl

Article #1149

#1149

From: Pawel Gajda
Date: Thu, 26 Mar 1998 09:40

21 lines
1022 bytes

Przemek Bak wrote:
> 
> Mam przykladowy kawalek kodu:
> 
> #!/bin/perl
> $RecordSeparator = '^';
> ......
> while (<JAKIS_INPUT>) {
>      s/.*$RecordSeparator$//;   # chce wyrzucic znak '^' poprzedzajacy koniec
> linii
>      # .......... reszta kodu
> }
> 
> W taki sposob jak powyzej to nie dziala. Oczywiscie moge wpisac od razu
>  s/.*\^$//;

$RecordSeparator = '\^' powinno zadzialac   

Poza tym nie powinno byc tam s/$RecordSeparator$// ?

Paweł

Technical Details

Message-ID: <351A2294.5E0102CB@obop.com.pl>

Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!pingwin.icm.edu.pl!news.icm.edu.pl!lublin.pl!not-for-mail

References: <35192D65.D5B22FB8@kki.net.pl>

Show Full Headers

Complete Article Headers

Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!pingwin.icm.edu.pl!news.icm.edu.pl!lublin.pl!not-for-mail
From: Pawel Gajda <pawelg@obop.com.pl>
Newsgroups: pl.comp.lang.perl
Subject: Re: Zmienna w operatorze s///
Date: Thu, 26 Mar 1998 10:40:36 +0100
Organization: OBOP
Lines: 21
Message-ID: <351A2294.5E0102CB@obop.com.pl>
References: <35192D65.D5B22FB8@kki.net.pl>
NNTP-Posting-Host: hq.obop.com.pl
Mime-Version: 1.0
X-Mailer: Mozilla 4.04 [en] (X11; I; Linux 2.0.32 i586)
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Reply to Parent Message