#/usr/bin/perl -w
use strict;
use Date::Parse;

my $date;
$date = "Aug, 20 1955 11:09:55 +0100";
my $time;
$time = str2time($date);
print " $date\n";
print " $time\n"

# perl tmp.pl
 Aug, 20 1955 11:09:55 +0100
 -453390605