Aus einer Variable für REGEX code ausführen? - #105561 (Allgemeines zu Perl)

toby

2008-02-05 00:52

User since
2006-04-14
66 Artikel
BenutzerIn
[default_avatar]

Hallo Forum,

habe mein kompliziertes Problem auf ein Minimum gedumpt. Dieses Minimum ergibt allerdings keinen Sinn, also nicht wundern. ;) Es wurde nur erstellt um zu verdeutlichen, was ich vorhabe...

Bsp1: normaler regex

Code: (dl )

1
2

my $regex = 'y';
print "ja\n" if "xyz" =~ m/x${regex}z/;

Bsp2: regex mit perl-code:

Code: (dl )

1
2

my $regex = 'y/;print time()';
print "ja\n" if "xyz" =~ m/x${regex}z/;

Mein Problem ist, dass beim regex-Auswerten im Bsp2 das print time() nicht ausgeführt wird :(
Irgendetwas passiert allerdings, da wenn ich eine Klammer vergesse z.B. my $regex = 'y/;print time('; bekomme ich hässlichen Fehler...

Wie kann ich also aus der Variable einen regex beenden und den nachfolgenden Perlcode ausführen?

Vielen Dank! :)
Tobias