$ perl -we 'use Date::Manip; print UnixDate($ARGV[0], "%Q\n")' 11004
20110104
$ perl -we 'use Date::Manip::Date 6.0; print Date::Manip::Date->new($ARGV[0])->printf("%Q\n")' 11004
20110104
$