[TCL] tcl en regexp probleem

[Verwijderd]

Moggûh, ik zit met een klein regexps probleempje. Ik probeer gegevens uit een xml file in te lezen voor een irc botje alleen het wil nog niet helemaal lukken.

Een voorbeeldje uit het xml bestand

code:

<link>http://www.test.nl/details.php?id=286</link>
<category domain="http://www.test.nl/view.php?sub=4">Album</category>

tcl script

code:

regexp "<title>(.*)</title>" $line trash postsdata(titel,$count)

Op deze manier is dus het link element op te halen. Alleen het category element zal natuurlijk zo nooit werken omdat er nog het een en ander tussen de tag staat. Ik heb een paar manieren geprobeerd om ook de informatie te krijgen wat tussen het category element zit maar nog niet gelukt.

code:

regexp "<category domain=(.*)>(.*)</category>" $line trash postsdata(cat,$count)

Op bovenstaande manier krijg ik wat er tussen de tag staat dus de informatie bij domain. Heeft iemand misschien een idee hoe ik wel de juiste informatie kan krijgen?

[Verwijderd]

*schop*

Niemand die dit weet?

[frv]

Moet het met regexp ?

Waarom niet even proberen met string functies om er gewoon dat deel uit te halen die je wil ?

[[Jules]]

Of waarom niet met regsub? ook vrij eenvoudig:

code:

% set t {<link>http://www.test.nl/details.php?id=286</link>}
<link>http://www.test.nl/details.php?id=286</link>
% regsub -all {\</?link\>} $t {} o
2
% puts $o
http://www.test.nl/details.php?id=286

Of inderdaad met string functies:

code:

% set u {<category domain="http://www.test.nl/view.php?sub=4">Album</category>}
<category domain="http://www.test.nl/view.php?sub=4">Album</category>
% puts [lindex [split $u \"] 1]
http://www.test.nl/view.php?sub=4
% puts [lindex [split $u \<\>] 2]
Album

Is ook te doen zo...

[ Voor 14% gewijzigd door [Jules] op 29-08-2005 19:57 ]

[Verwijderd]

bedankt voor de reacties ik ga het zo weer eens proberen