Alter aus Geburtsdatum errechnen

[testding]

Hallo

$gdatum="01.01.1970";

  
split $gdatum = $jahr, $monat, $tag;  
  
$alter <- $dieses\_jahr - $jahr;  
  
Wenn $monat < $dieser\_monat  
  $alter++  
sonst wenn $monat == $dieser\_monat  
  wenn $tag <= $dieser\_tag  
    $alter++  
  
Damit du auch was lernst, habe ich es kryptisch geschrieben.  
Das ist ungetestet, sollte aber pi mal Daumen funktionieren.  
  
Lg  
testding