3-fach Hash, oder so ?

[$xNeTworKx]

Hi,
hab da ein kleines Problemchen, und zwar würde ich gerne folgende Datenstruktur nach dem Datum im Format TT.MM.JJJJ sortieren.
Hier einer Beispiel solche einer Struktur.

<party>
<wann>12.04.2002</wann>
<soundsystem>blabla</soundsystem>
<info></info>
<flyer></flyer>
</party>

Ich will das alle solche Einträge jeweils so sortiert werden, daß der Eintrag mit dem neuesten Datum oben ist (wenn die Daten ausgegeben werden).

Ich bin mal so weit :

#!C:/Perl/bin/perl -w

use strict;
my $in = '';
my @array = ();
my %hash;
    open(FILE,"parties.txt") or die "Cant open database : $!\n";
    local $/;
    $in = <FILE>;
    close FILE;
       while ($in =~ /<party>(.+?)</party>/sg)  {
       my $termin = $1;
             if ($termin =~ /<wann>(\d{2}.\d{2}.\d{4})</wann>/sg)  {
             my $datum = $1;
             push @array, $termin, $datum;
             }
            %hash = @array;
       }
Jetzt wäre es natürlich leicht, zu sortieren, wenn ich nur einen Schlüssel hätte, aber wie kann ich das jetzt bewerkstelligen, wenn ich 3 Werte zu sortieren habe ? Ich darf doch den Zusammenhalt der ganzen Werte nicht verlieren (Tag, Monat, Jahr) und das mein Problem, ich versteh nicht wie ich das anstellen soll ?