"John W. Krahn" schreef:

> I seem to remember that Jeffrey Friedl's[1] book describes a way to
> emulate left and right word boundaries in Perl's regular expressions.


$ echo 'abc test def' |perl -wple'
  $lwb = qr/\b(?=[[:alnum:]])/;
  $rwb = qr/(?<=[[:alnum:]])\b/;
  s/${lwb}test${rwb}/X/g;
'
abc X def


$ echo 'abc test def' |perl -wple'
  $lwb = qr/(?<![[:alnum:]])(?=[[:alnum:]])/;
  $rwb = qr/(?<=[[:alnum:]])(?![[:alnum:]])/;
  s/${lwb}test${rwb}/X/g;
'
abc X def

(should both also work with "test" at start or end) 

-- 
Affijn, Ruud

"Gewoon is een tijger."

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to