$dt = DateTime->now; # same as ( epoch => time() ) $dt->set_time_zone( 'America/New_York' ); print "\n Now:".$dt->hms; print "\n YMD: ".$dt->ymd; #returns: # Now:17:15:48 # YMD: 2008-09-19