use Date::Format;
        
        @lt = localtime(time);
        
        print time2str($template, time);
        print strftime($template, @lt);