Regularni vyrazy

[Jiri Polcar]

1> $text = "x 12.223,3349 x";
2> $text =~ s|([0-9]([0-9])?(\.([0-9][0-9][0-9]))*(,[0-9]+)*)|$a = $1; 
3> $a =~ s/\.//g; 
4> $a|eg;
5> print "$text\n"

Mohl by by nekdo vysvetlit, jak to, ze TO funguje? Nerozumim radku 1 a
4, v zivote jsem to nevidel (nemam namysli ten RE). Kde to najdu v manu?

Diky

-- 
JP