Re: [Cascavel-pm] Formatter padrão para o DateTime
Luis Campos de Carvalho
monsieur_champs em yahoo.com.br
Quinta Outubro 13 13:03:49 PDT 2005
--- "Flavio S. Glock" <fglock em gmail.com> escreveu:
> A API do DateTime não tem isso, mas não é necessário criar uma
> subclasse - é melhor utilizar uma "factory":
>
> use DateTime;
> use DateTime::Format::Pg;
>
> sub PgDate::new {
> shift;
> my $pgdt = DateTime->new( @_ );
> $pgdt->set_formatter( 'DateTime::Format::Pg' );
> $pgdt;
> }
>
> my $d1 = PgDate->new( year=>1999 );
> print $d1;
>
> - Flavio S. Glock
Hum. Estou confuso.
Achei que o "isso" que faltava era um "set_formatter()" da vida.
Já que você usou, "isso" existe e não precisamos reinventar a roda.
Sua solução é muito mais curta e muito mais elegante.
;-) Thank you for one more Perl of wisdom...
--
Luis Campos de Carvalho
Member of "São Paulo Perl Mongers",
Unix SysAdmin & OCP/DBA Oracle
http://br.geocities.com/monsieur_champs/
_______________________________________________________
Promoção Yahoo! Acesso Grátis: a cada hora navegada você acumula cupons e concorre a mais de 500 prêmios! Participe! http://yahoo.fbiz.com.br/
Mais detalhes sobre a lista de discussão Cascavel-pm