perlunity.de - PERL | JAVASCRIPT | PHP | MySQL | APACHE



#!/COMMUNITY

Members: 5374
davon online: 1
weitere User: 27
Click for quality!




11.02.2012 / 19:47

Community-Member werden   |   Paßwort vergessen   |   OnlineMonitor (1) Wer ist online ... OnlineMonitor starten !
     

 

Home


PERLscripts


PHPscripts


JAVAscripts


Hilfreiches


Links2www


Newscenter


Community


Interna




Community  »  Perl: Allgemeines Forum zur Themenübersicht Themensuche Themenansicht in Thread-Modus


BeitragSuche und variables ersetzen
Seitenanfang
Hallo,

ich habe noch nicht viel mit Perl gearbeitet, muss nun aber folgendes Problem lösen:

ich suche ein komplettes Element (ABCSTW) und zwar so, dass ich zwei variable Teile bekomme: erstens den Inhalt des Elements ABCBEGRIFF und zweitens den ganzen Rest. Diesen Rest ($2) lese ich in die Perl-Variable $t und mache dort ein SUCHE/ERSETZE. Dabei soll „0x0x0x00“ durch den Inhalt von $1 ersetzt werden.
Leider funktioniert mein Code mit variabler Ersetzung nicht:

s/<ABCSTW><ABCBEGRIFF>(\w+)<\/ABCBEGRIFF>(.*?)
<\/ABCSTW>/$t=$2;$t=~s{0x0x0x00}{$1}g;"<ABCSTW>
+++".$t."<\/ABCSTW>"/g;

Das selbe Codefragment mit festem String funktioniert.

Hat vielleicht jemand eine Idee, was hier falsch ist?

Vielen Dank im Voraus

Datum: 11.01.2007-21:28

Beitragre: Suche und variables ersetzen
Seitenanfang
Hallo Tina,

Du solltest das Ergebnis $1 aus der ersten Suche zwischenspeichern, da die zweite Durchführung der mustererkennung diese neu setzt:


s/<ABCSTW><ABCBEGRIFF>(\w+)<\/ABCBEGRIFF>(.*?)
<\/ABCSTW>/ ;

$t=$2;
$erg=$1;
$t=~s{0x0x0x00}{$erg}g; # ... etc.

Gruß floyd

Datum: 13.01.2007-19:18

Beitragre: Suche und variables ersetzen
Seitenanfang
Hallo Floyd,

so funktionert es.
Vielen Dank!

Datum: 15.01.2007-13:34

-






-
-