Reg exp

[Honza Pazdziora]

On Wed, Feb 07, 2001 at 08:05:39PM +0100, Martin MaD Douda wrote:
> 
> 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");

$ perl
$cim="\2\1\3";
eval("/(\s+)(\w+)(\s+)(\w+)/$cim");
print "$@\n";
__END__
Unrecognized character \002 at (eval 1) line 1.

Pak ale stejne musite nejak oquotovat ta data pri prirazovani do
retezce $cim, a krome toho by to v tom evalu melo byt s/neco/$cim/,
nikoli /neco/$cim.

-- 
------------------------------------------------------------------------
 Honza Pazdziora | adelton na fi.muni.cz | http://www.fi.muni.cz/~adelton/
 .project: Perl, mod_perl, DBI, Oracle, auth. WWW servers, XML/XSL, ...
Petition for a Software Patent Free Europe http://petition.eurolinux.org
------------------------------------------------------------------------