use Date::Manip; 
$todays_date = UnixDate("now", "%d.%m.%y");