Re: [Cascavel-pm] Total de dia de determinado mês.

[Marco Modesto]

Lembre-se que de 400 em 400 anos nao ha ano bissexto, mesmo o ano
sendo divisivel por 4.
Exemplo: Ano 2000.


[]s


Em 07/11/05, João Gabriel<jamorreu em gmail.com> escreveu:
> Luis Campos,
> janeiro desse mês teve 31 dias ;-)
>
>
> Sandro, segue um exemplo completo e elegante...
>
> __CODE PERL__
> sub bisexto {
>         $ano = $_[0];
>         if($ano % "4" eq "0") { return "28"; } else { return "29"; }
> }
>
> %diasdomes = (
>         1 => 31,
>         2 => &bisexto($year),
>         3 => 30,
>         4 => 31,
>         5 => 30,
>         6 => 31,
>         7 => 30,
>         8 => 31,
>         9 => 30,
>         10 => 31,
>         11 => 30,
>         12 => 31,
> );
>
> for ($conta=1, $max=31; $conta <= $max; $conta++) {
>         print "Mês: $conta -> $diasdomes{$conta} dias\n";
> }
> __END CODE PERL__
>
>
> --
> []'s
> João Gabriel
> CGiClube.net - www.cgiclube.net
> Vitória Perl Mongers - vitoria.pm.org
>
>
>
>
> Em 07/11/05, João Gabriel<jamorreu em gmail.com> escreveu:
> > Luis Campos...
> > > Será que não dá prá fazer um módulo?
> >
> > tem 200 sobre o assunto no CPAN...
> >
> > --
> > []'s
> > João Gabriel
> > CGiClube.net - www.cgiclube.net
> > Vitória Perl Mongers - vitoria.pm.org
> >
> >
> >
> >
> >
> > Em 06/11/05, Nelson Ferraz<nferraz em gmail.com> escreveu:
> > > >   Muito complicado.
> > >
> > > hehehe
> > >
> > > Foi esse o objetivo. : )
> > > _______________________________________________
> > > Cascavel-pm mailing list
> > > Cascavel-pm em pm.org
> > > http://mail.pm.org/mailman/listinfo/cascavel-pm
> > >
> >
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>