XML: leeren XML - Tag (Perl/CGI)

Schmidtl

2005-11-08 12:28

User since
2005-09-27
14 Artikel
BenutzerIn
[default_avatar]

Hallo,

ich bearbeite mit XML::Simple eine XML - Datei. Beim Löschen lese ich halt die Struktur aus und mache dann:

Code: (dl )

delete($struct->{SWITCH}->[$snum]);

Klappt alles, nur leider bleibt am Ende <SWITCH /> stehen. Das muss noch weg. Gibts da noch eine Zusatzfunktionen oder einen zusätzlichen Parameter? Oder kann man das nur über die Dateifunktionen entfernen, was ja recht unelegant wäre!?

Danke.

MfG

Relais

2005-11-08 13:30

User since
2003-08-06
2246 Artikel
ModeratorIn

Warum löschst Du einen Array-Slot, wenn Du doch einen Hash-entry löschen willst?
Vergleiche:

Code: (dl )

perl -MData::Dumper -e '$struct->{SWITCH}->[0] = 1; delete $struct->{SWITCH}->[0]; print Dumper $struct'

und

Code: (dl )

perl -MData::Dumper -e '$struct->{SWITCH}->[0] = 1; delete $struct->{SWITCH}; print Dumper $struct'

Erst denken, dann posten --
27. Deutscher Perl- u. Raku -Workshop (Termin wird noch gesucht) 2025 in München.

Winter is Coming

Schmidtl

2005-11-08 13:50

User since
2005-09-27
14 Artikel
BenutzerIn
[default_avatar]

Hallo,

es gibt bei mir mehrere SWITCH. Also:

Code: (dl )

<SWITCH content="bla" name "a">
......
</SWITCH>
<SWITCH content="qwertz" name "b">
......
</SWITCH>

Und jetzt lösche ich den SWITCH "a". Also

Code: (dl )

delete $struct->{SWITCH}->[0];

Ansonsten lösche ich doch alle SWITCH und keinen bestimmten.

Sorry, war vielleicht etwas blöd von mir beschrieben.

MfG

Dubu

2005-11-08 16:47

User since
2003-08-04
2145 Artikel
ModeratorIn + EditorIn

user image

Vielleicht liegt es daran, dass man mit delete() Arrayelemente (ausser am Ende) gar nicht loescht, sondern nur mit undef belegt. Um ein Element wirklich aus einem Array zu entfernen, nimmt man splice().

Schmidtl

2005-11-08 17:40

User since
2005-09-27
14 Artikel
BenutzerIn
[default_avatar]

Gut danke, probiere es direkt aus.

Schmidtl

2005-11-11 09:26

User since
2005-09-27
14 Artikel
BenutzerIn
[default_avatar]

Hallo,

wenn ich es mit undef mache, bleibt trotzdem noch <SWITCH/> in der Datei enthalten. Mit splice() bekomme ich Probleme, da Perl der Überzeugung ist, dass meine Datenstruktur kein Array ist. Da dachte ich komme mit splice(@{$struct->......},0) weiter aber das geht auch nicht. Wo liegt noch das Problem?

Vielen Dank!

MfG

Relais

2005-11-11 10:09

User since
2003-08-06
2246 Artikel
ModeratorIn

Wie äußert sich[quote=Schmidtl,11.11.2005, 08:26]aber das geht auch nicht.[/quote]?

Erst denken, dann posten --
27. Deutscher Perl- u. Raku -Workshop (Termin wird noch gesucht) 2025 in München.

Winter is Coming

Dubu

2005-11-11 10:19

User since
2003-08-04
2145 Artikel
ModeratorIn + EditorIn

user image

[quote=Schmidtl,11.11.2005, 08:26]Da dachte ich komme mit splice(@{$struct->......},0) weiter aber das geht auch nicht. Wo liegt noch das Problem?[/quote]
Das entfernt alle Elemente, angefangen mit dem ersten (0), aus dem Array.
perldoc -f splice.