Opened by dukeofnukem at 2007-06-22 17:09
User since
2007-01-15
47 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2007-01-15
47 Artikel
BenutzerIn
Die letzten Tage macht mich Perl verrückt...
Jetzt hab ich folgendes:
der erste Regexptest gibt mir die richtige Cid, die erste ternary op printed mir "MATCH" aber ich kriege "CID should be empty: I HATE YOU".
Auch wenn ich mit dem debugger durchsteppe, liefert mir die regexp im zweiten ternary op den gleichen Wert wie im ersten. Auch hab ich die inzwischen kapierte /g -iteration ja nicht drin...
Es ist zum heulen...
TIA,
DoN
Jetzt hab ich folgendes:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
my %xmlstring = (
QueryCId => qr/<nC[o]?ntr[a]?ctID[^>]*>\s*(\d+)\s*<\/nC[o]?ntr[a]?ctID>/s,
);
print "\nreg: ", $nsi[$index] =~ /$xmlstring{'QueryCId'}/;
$nsi[$index] =~ /$xmlstring{'QueryCId'}/ ?
print "\nMATCH" :
print "\nNO MATCH";
$nsi[$index] =~ /$xmlstring{'QueryCId'}/ ?
$cid = '' :
$cid = 'I HATE YOU';
print "\nCID should be empty: ", $cid;
der erste Regexptest gibt mir die richtige Cid, die erste ternary op printed mir "MATCH" aber ich kriege "CID should be empty: I HATE YOU".
Auch wenn ich mit dem debugger durchsteppe, liefert mir die regexp im zweiten ternary op den gleichen Wert wie im ersten. Auch hab ich die inzwischen kapierte /g -iteration ja nicht drin...
Es ist zum heulen...
TIA,
DoN
drum&bass is a state of mind