my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime($unixtime); 
$mon +=1; 
$year +=1900; 

$versionszeile = 'P1_Version_2 19.01.2008 - dies und das'; 
 
my ($version_text, $version_datum, undef) = split(/\s/, $versionszeile, 3); 
 
print "---$version_text---$version_datum---";