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

$_ = "[27/Feb/2002:05:05:51 -0800]";
s/\[|\]//g;         # Strip the brackets for Date::Manip
$_ = ParseDate($_);
s/://g;             # Strip the colons for MySQL
print;