🚀 go-pugleaf

DA_none <danone@eleet.webmedia.pl> wrote:
: hej 
: jakie nalerzy dac parametry w s rzeby przy przeszykiwaniu uzglednial wszystkie
: znaki \r i \n tez .. 

Nie bardzo rozumiem. Ale chyba chodzi Ci o to, co zrobić żeby . 
(kropka) dotyczyła także \r i \n - prosta sprawa, zamiast . pisz 
[.\r\n] (powinno też zadziałać [^] ale nie sprawdzałem).

-- 
Piotr Piątkowski, Uczelniane Centrum Informatyki, AGH Krakow, POLAND

Piotr Piatkowski <kompas@galaxy.uci.agh.edu.pl> wrote in article
<5ap0eg$pd@galaxy.uci.agh.edu.pl>...
> DA_none <danone@eleet.webmedia.pl> wrote:
> : hej 
> : jakie nalerzy dac parametry w s rzeby przy przeszykiwaniu uzglednial
wszystkie
> : znaki \r i \n tez .. 
> 
> Nie bardzo rozumiem. Ale chyba chodzi Ci o to, co zrobić żeby . 
> (kropka) dotyczyła także \r i \n - prosta sprawa, zamiast . pisz 
> [.\r\n] (powinno też zadziałać [^] ale nie sprawdzałem).

Jezeli napiszesz "[.\n\r]" to bedzie oznaczalo "jeden z trzech znakow:
kropka, \n, lub \r".  To znaczy, w srodku kwadratowych nawiasow (zbioru
znakow), '.' jest brane doslownie. Poniewaz '.' pokrywa wszystkie znaki
oprocz \n (ale z \r wlacznie), zeby uwzglednic \n, wystarczy napisac
"(.|\n)", lub wybrac sobie jakis znak, ktorego nie ma w pliku, na przyklad
z kodem 0, i napisac [^\000], czyli wszystki znaki (z \n wlacznie), oprocz
znaku z kodem 0. Na przyklad:

$text = "alpha\n beta\n gama\n";
$text =~ s/alpha[^\000]*gama/alpha-gama/;
print $text;

wypisze: alpha-gama

        Kasia

Kathleen Marszalek wrote:
> 
> Piotr Piatkowski <kompas@galaxy.uci.agh.edu.pl> wrote in article
> <5ap0eg$pd@galaxy.uci.agh.edu.pl>...
> > DA_none <danone@eleet.webmedia.pl> wrote:
> > : hej
> > : jakie nalerzy dac parametry w s rzeby przy przeszykiwaniu uzglednial
> wszystkie
> > : znaki \r i \n tez ..
> >
> > Nie bardzo rozumiem. Ale chyba chodzi Ci o to, co zrobić żeby .
> > (kropka) dotyczyła także \r i \n - prosta sprawa, zamiast . pisz
> > [.\r\n] (powinno też zadziałać [^] ale nie sprawdzałem).
> 
> Jezeli napiszesz "[.\n\r]" to bedzie oznaczalo "jeden z trzech znakow:
> kropka, \n, lub \r".  To znaczy, w srodku kwadratowych nawiasow (zbioru
> znakow), '.' jest brane doslownie. Poniewaz '.' pokrywa wszystkie znaki
> oprocz \n (ale z \r wlacznie), zeby uwzglednic \n, wystarczy napisac
> "(.|\n)", lub wybrac sobie jakis znak, ktorego nie ma w pliku, na przyklad
> z kodem 0, i napisac [^\000], czyli wszystki znaki (z \n wlacznie), oprocz
> znaku z kodem 0. Na przyklad:
> 
> $text = "alpha\n beta\n gama\n";
> $text =~ s/alpha[^\000]*gama/alpha-gama/;
> print $text;

A najprościej napisać s/......./....../s. 

    To facilitate multi-line substitutions, the "." character
       never matches a newline unless you use the /s modifier,
       which tells Perl to pretend the string is a single
       line--even if it isn't.  The /s modifier also overrides
       the setting of $*, in case you have some (badly behaved)
       older code that sets it in another module.

Michał

-- 
********     MEMBER OF THE INTERNATIONAL PROGRAMMERS GUILD    ********
WWW: http://www.pdi.lodz.pl/~mimo   tel: Int. Acc. Code + 48 42 148340
add: Michal Mosiewicz  *  Bugaj 66 m.54 *  95-200 Pabianice  *  POLAND

Michał Mosiewicz <mimo@lodz.pdi.net> wrote in article
<32D115AF.33D99808@lodz.pdi.net>...

> A najprościej napisać s/......./....../s. 

No tak, pod warunkiem, ze nie uzywa sie wersji 4.  Ta opcja zostala chyba
wprowadzona w PERL-u 5.

        Kasia

Kathleen Marszalek wrote:
> 
> Micha³ Mosiewicz <mimo@lodz.pdi.net> wrote in article
> <32D115AF.33D99808@lodz.pdi.net>...
> 
> > A najpro¶ciej napisaæ s/......./....../s.
> 
> No tak, pod warunkiem, ze nie uzywa sie wersji 4.  Ta opcja zostala chyba
> wprowadzona w PERL-u 5.

W czworce tez jest ale nie jako modifier /s.

Z pozdrowieniami,

--
Gregory BRZESKI - WEB Corporation Limited - http://www.webcorp.co.uk/

Gregory BRZESKI <gregory@webcorp.com.pl> wrote in article
<32D25FA5.24BF5C57@webcorp.com.pl>...
> Kathleen Marszalek wrote:
> > 
> > Michał Mosiewicz <mimo@lodz.pdi.net> wrote in article
> > <32D115AF.33D99808@lodz.pdi.net>...
> > 
> > > A najprościej napisać s/......./....../s.
> > 
> > No tak, pod warunkiem, ze nie uzywa sie wersji 4.  Ta opcja zostala
chyba
> > wprowadzona w PERL-u 5.
> 
> W czworce tez jest ale nie jako modifier /s.

Jest? Jako co?  Jezeli masz na mysli $* to to nie pomaga ('.' wciaz nie
uwzglednia \n.)

        Kasia