RegExp: Zahl x durch x Unterstreichungszeichen ersetzen

[alligator]

Hi,

Gibt aber bestimmt besseres,

ja: den Schalter /e (mit der selben Funktion).

Aha gut zu wissen :o),
1. gibt aber bei use warnings eine Warnung aus ( steht auch in der perldoc )
2. ich komme nicht drauf, warum das dann bei mir ne Endlosschleife gibt
denn \1 ist die Zahl 11 (zumindest wenn ich das /e weglasse):
die Zahl 11:
$text = "blabla_11_irgendwas";
print $text."\n";
$text=~s/_(\d+)_/_ x \1/e;
print $text."\n";

cya
alligator