Reguläre Ausdrücke in Variablen

[Adrian Kousz]

Hallo zusammen!

Wieso kann man reguläre Ausdrücke nicht in Variablen schreiben, die dann ausgeführt werden?
Das untenstehende Programm gibt leider beide Male dasselbe aus...
______

my $regexp = "s/suchen/ersetzen/g";

if ($regexp =~ /s/.*/.*/.?/) { print "TRUE\n" }
else {print "FALSE\n" }

$test = "1suchen 2buchen 3kuchen 4suchen 5ersetzen\n";
print "$test\n";
$test =~ $regexp;
print $test;
______

Wenn ich jedoch den regulären Ausdruck direkt in die 2. unterste Zeile schreibe funktioniert das Ganze.
Wie kann man machen, dass RegExp aus Variablen ausgeführt werden?

Vielen Dank!
Adi

PS: Cool, dass man sich hier nicht registrieren muss!
Möchte ein Programm schreiben, mit dem man per RegExp Dateien umbenennen kann.