% if(!$noinit) { % } <%init> my($name, $value, $format, $usedatetime, $noinit); if ( ref($_[0]) ) { my $opt = shift; $name = $opt->{'name'}; $value = $opt->{'value'}; $format = $opt->{'format'}; $usedatetime = $opt->{'usedatetime'}; $noinit = $opt->{'noinit'}; } else { ($name, $value, $format, $usedatetime) = @_; } my $conf = new FS::Conf; $format ||= $conf->config('date_format') || '%m/%d/%Y'; if ( $value =~ /\S/ ) { if ( $usedatetime ) { my $dt = DateTime->from_epoch(epoch => $value, time_zone => 'floating'); $value = $dt->strftime($format); } elsif ( $value =~ /^\d+$/ ) { $value = time2str($format, $value); } } else { $value = ''; }