Sommerzeit in Perl

Hallo ihr Wissenden,

ich habe ein Problem mit der Berechnung der Epochen-Sekunden aus SEKUNDE, MINUTE, STUNDE, TAG, MONAT, JAHR und Sommerzeit. Leider habe ich es nicht geschafft, der Funktion timelocal den Wert für die Sommerzeit**[0|1]** zu übergeben.
Der Term
$SEKUNDEN= timelocal($SEKUNDE, $MINUTE, $STUNDE, $TAG, $MONAT, $JAHR, undef, undef, $DST);
arbeitet zwar ohne, dass Perl meckert, aber es werden wohl nur die Werte bis einschliesslich $JAHR verarbeitet.

Der „Rückweg“ funktioniert
**@DATE= localtime 1130633999;
2005-10-30 02:59:59 1

@DATE= localtime 1130634000;
2005-10-30 02:00:00 0**

Gibt es einen Weg, die richtigen Epochen-Sekunden am z.B. 30.10.2005 zwischen 02:00-03:00 Uhr mit und ohne Sommerzeit zu berechnen?
Wer weiss Rat?

Gruß Andreas

Hilft dies weiter:

http://de.selfhtml.org/perl/funktionen/datumzeit.htm