unless-Funktion/ Fehler im RegEx? - #67132 (Allgemeines zu Perl)

Strat

2006-06-08 21:28

User since
2003-08-04
5246 Artikel
ModeratorIn

lc($element) erkennt er innerhalb der RE nicht als funktion.

Code: (dl )

  my $elem = lc($element);
  unless( $data =~ /\Q$elem\E/ ) {
    push( @more_candidates, $element );
  }

oder teste mal:

Code: (dl )

1
2

unless( $data =~ /\L$elem/ ) {
  ...

perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/