An einen regulären Ausdrucks Experten - Mit der großen BITTE um Hilfe.

[n.d. parker]

auch hi :-)

$var =~ /(self.*(html$))/

der duerfte zu gierig sein (also auch sowas wie "self html html" matchen (self html) )

hier meine loesung:

@test=('test', 'it is self-made', 'SelfHtml', 'SelfWebHtml');
foreach $test(@test){
$test=~/(self(?:.(?!tml))*)(?:html$)/is;    # fuers archiv am schluss steht (?: html pipezeichen $ )
print "$1\n";}

/s ist nur, damit der . auch evtl. \n im string erkennt.

achso, bei performanteren Geschichten wuerde ich auf $& verzichten, diese Variable ist ziemlich verpoent :-)

cua

n.d.p.