perl -we 'use Date::Manip::Date; $d = Date::Manip::Date->new("now"); $d->convert("UTC"); print $d->printf("[localtime://%OUTC]\n");'