Re: [Cascavel-pm] Formatter padrão para o DateTime

[Luis Campos de Carvalho]

--- "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/