use Date::Parser; my $line = '[26-Oct-2013 13:10:44] irgendwas...'; my $format = "%d-%h-%Y %H:%M:%S"; my $parser = Date::Parser->new; my $epoche = $parser->parse_data( $format, $line )->unixtime;