Reg exp

[Martin MaD Douda]

Urcite by to slo tak, ze si ten vyraz postavite do retezce a pustite pres eval(), jestli to jde jednoduseji nevim.
neco jako:

eval("/(\s+)(\w+)(\s+)(\w+)/$cim");


			Martin
			


On Wed, Feb 07, 2001 at 12:22:09PM +0100, DADAJ Marián wrote:
> potreboval by som za behu programu menit "pravy' regularny vyraz pri
> pouzitei prikazu s.
> vyzera to nasledovne :
> 
> $data="   abc   123";
> $co="(\s+)(\w+){\s+)(\w+)";
> $cim="\2\1\3";
> 
> 1: s/$co/$cim/gi; #Toto mi vsak nefunguje na rozdiel od
> 2: s/$co/\2\1\3/gi; #co reaguje korektne.
> 
> Ako mam napisat reg exp pre $cim, alebo ako smenit pravu stranu s///,
> aby som dosiahol korekny (kroy ocakavam)vysledok?
> 
> vysledok 2 : "abc   123" --toto chcem
> vysledok 1 : "\2\1\3"
> 
> Pouzivam ActivePerl Build 522 Monday, November 1, 1999
> 
> Vdaka za pomoc :)
--------------------------------------------------------------------------------
                              Martin "MaD" Douda
WEB: http://martin.douda.net/   PHONE:+420603752779   ICQ# 86467013
EMAIL: <martin na douda.net>, <mad na gate.mobil.cz> (160 characters only)
PGP:ID=0x6FE43023 Fingerprint:E495 11DA EF6E 0DD6 965A 54F3 888E CC9E 6FE4 3023
--------------------------------------------------------------------------------
Neznalost zakonu neomlouva. Murhy.