Zmienna w operatorze s///

Thread View: pl.comp.lang.perl

5 messages

[T] Back to Threads [V] Tree View [G] Group Articles

5 total messages Started by Przemek Bak Wed, 25 Mar 1998 16:14

#1148

Author: Przemek Bak
Date: Wed, 25 Mar 1998 16:14

21 lines
1014 bytes

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/.*\^$//;
ale chcialbym uzyc zmiennej, zeby ktos, kto nie zna wogole perla mogl sobie
pzrystosowac skrypt do swoich potrzeb bez grzebania w srodku.


przemol
--
przemol@mvii.uni.lodz.pl

Re: Zmienna w operatorze s///

#1149

Author: 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ł

Re: Zmienna w operatorze s///

#1150

Author: Krzysztof Murkowski
Date: Thu, 26 Mar 1998 10:42

15 lines
973 bytes

Pawel Gajda wrote:
> Przemek Bak wrote:
> >
> >      s/.*$RecordSeparator$//; 
>
> Poza tym nie powinno byc tam 
>
> s/$RecordSeparator$// ?

A nie jest to przypadkiem w sensie efektu to samo ?

-- 
Krzysztof Murkowski
mailto:murek@ml.put.poznan.pl
http://www.ml.put.poznan.pl/~murek

Re: Zmienna w operatorze s///

#1151

Author: Pawel Gajda
Date: Thu, 26 Mar 1998 11:02

16 lines
930 bytes

Krzysztof Murkowski wrote:
> 
> Pawel Gajda wrote:
> > Przemek Bak wrote:
> > >
> > >      s/.*$RecordSeparator$//;
> >
> > Poza tym nie powinno byc tam
> >
> > s/$RecordSeparator$// ?
> 
> A nie jest to przypadkiem w sensie efektu to samo ?

nie, pierwsze zamieni cala linie na nic. 

Paweł

Re: Zmienna w operatorze s///

#1152

Author: Przemek Bak
Date: Tue, 31 Mar 1998 06:24

30 lines
1262 bytes

Pawel Gajda wrote:

> 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

Tak, w ten sposób działa.

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

 Masz rację, zmieniłem to na sposób podany przez Ciebie.
Dziękuję.

przemol
--
przemol@mvii.uni.lodz.pl

Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads