Altersanzeige komplett!

[Jean-Max]

Bounjoun Gary,

$dbtag -> aus DB
$dbmonat -> aus DB
$dbjahr -> aus DB

zu deinem Modul:
Das ist ein Mords Teil *staun*

Keineswegs...

Ich glaube da brauche ich erst ein Studium um es richtig und vollends bedienen zu können. Sorry - nicht böse sein, aber das ist so als wenn ich eine 747 fliegen müsste...

Du musst Dir nur die Methoden aussuchen, die Du brauchst, z.B. get_age() für das Alter.

Modul einbiden[1]:

use Date::Today;

Instanz erstellen:

my $t = Date::Today->new('de'); # Sprache Deutsch

Methode get_age() benutzen:

my $ageOfCustomerX = $t->get_age($dbjahr,$dbmonat,$dbtag);

[1] Das Modul »Today.pm« ins Verzeichnis kopieren, wo auch Date::Calc ist, i.d.R bei Windows: LAUFWERK:\Perl\lib\Date

Adiou.