use Date::Format;
use Date::Language;
use Date::Parse;
my $lang_date = Date::Language->new('German');

while (my $date_string = <DATA>) {
  chomp($date_string);
  next if not length $date_string;
  print "$date_string ist Unixtime ",
        $lang_date->str2time($date_string),
        " und ",
    $lang_date->time2str( '%d.%m.%Y %T (%Z)',$lang_date->str2time($date_string) ),
        "\n";
}

=for output

ergibt:

1.3.1999 ist Unixtime 915318000 und 03.01.1999 00:00:00 (CET)
1 März 1999 ist Unixtime 920242800 und 01.03.1999 00:00:00 (CET)
1. März 1999 ist Unixtime 920242800 und 01.03.1999 00:00:00 (CET)
1/3/1999 ist Unixtime 915318000 und 03.01.1999 00:00:00 (CET)

=cut

__DATA__
1.3.1999
1 März 1999
1. März 1999
1/3/1999