Perl/Regex Variablen

[Niels Dettenbach]

Hallo Liste,

habe hier eine Zeile Perl, wo's nicht weiter will:

$giecker        =~ s/\n(A|B|C|F|G)\n/\n\n$hash('$1')\n/g;

Den Match $1 möchte ich nutzen, um ihn durch einen zugehörigen Hashwert (davor 
noch ein '\n') von $1 ersetzen zu lassen.

$giecker        =~ s/\n(A|B|C|F|G)\n/\n\n&long('$1')\n/g;

habe ich ebenfalls probiert. Offensichtlich wird der Variablenausdruck bzw. 
der subcall nicht durchgeführt. Ich bekomme als Ergebnis jeweils z.B.  ('A') 
, ('B') etc. heraus.

Gibt es eine Möglichkeit, innerhalb des regulären Ausdruckes $1 für 
Perl-Anweisungen zugänglich zu machen? Vielleicht habe ich ja auch nur 
Tomaten auf den Augen ß)

Beste Grüße,

Niels. 

-- 
tlug Mailingliste
Archiv: http://www.tlug.de/archiv/
http://schwarz.thueday.de/mailman/listinfo/tlug_allgemein