Normales Datum in Unix Format umrechnen - 70Jahre Problem

[Kokol]

Hi,

bei der Verwendung kam es zu einem Fehle - jetzt geht es soweit, allerdings ist da ein 70Jahre Mysterium (es wird die richtige Anzahl an Tagen angezeigt, nicht aber an Jahren:

#!/usr/bin/perl

use Time::Local;

$jahr = "2008";
$monat = "11";
$tag = "30";

$jahrB = "2008";
$monatB = "12";
$tagB = "8";

###########

$monat = $monat - 1;
$jahr = $jahr - 1900;
$monatB = $monatB - 1;
$jahrB = $jahrB - 1900;

print "Content-type: text/html\n\n";

my $seksA = timelocal(0,0,0,$tag,$monat,$jahr);
my $seksB = timelocal(0,0,0,$tagB,$monatB,$jahrB);
$differ = $seksB - $seksA;

print "$seksA <br>";
print "$seksB <br>";

($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = gmtime($differ);
print "Tage $mday - Monate $mon - Jahre $year";

exit();

Was mache ich nur falsch?

Viele Grüße