Re: [PERL] regexps

[Bjorn Ardo <sslug@sslug>]

On Mon, May 01, 2000 at 04:22:47PM +0200, Carsten Svaneborg wrote:
> Hej.
> 
> Jeg vil gerne kunne loade en regex fra en fil og anvende den til
> at sammenligne nogle data. Det har vist sig muligt at gøre
> 
> my $reg="some\\sregex\\s";
> my $bool= ($sometext =~ /$reg/);
> 
> Så det er uproblematisk at finde en /../ regex i filen og
> grabbe indeholdet af regex'en ud med en anden regex
> /\/(.*?)\// ;  $reg=$1;
> 
> Mit problem er med atributter, hvad hvis jeg gerne vil have
> /../is så virker
> 
> my $reg="some\\sregex\\s";
> my $attr="is";
> my $bool= ($sometext =~ /$reg/$attr);
> 
> ikke. Nogle ideer?
> 

Använda: eval()

-- 
  -----       Dr Crusher: "If there's nothing wrong
  Bjorn                    with me ...there must be 
  -----                    something wrong with the 
                           universe."