eigener XML-Parser; Speicheralgorithmus gesucht

[Philipp Hasenfratz]

Hallihallo

Vielleicht noch anders formuliert:

sub saveTheShit
{
   my $self = shift;
   my $XMLstream='';

my @pathIDs = sort {$a <=> $b} keys %{$self->{Nodes}};
   # @pathIDs enthält nun _alle_ pathes (sortiert).

while ( my $pathID = shift @pathIDs )
   {
      # Aktueller Path/Element ausgeben
      [...]
      $XMLstream .= " <$elementName $elementAttributes>\n ";

if ($self->isEndPoint($pathID))
      {
         # keine weiteren Unterelemente mehr, path fertig.
         $XMLstream .= "$elementValue";
         my $nextPathID = $pathIDs[0];
        $XMLstream .= $self->_closeTagAlgorithm($pathID, $nextPathID)
      }
   }
}

so, nun ist die Frage: wie muss diese _closeTagAlgorithm Methode beschaffen sein, dass die den String zurückgibt, der die geöffneten Tags beendet?

Viele Grüsse

Philipp