Opened by Gast at 2007-01-22 11:44
User since
2003-08-04
12209 Artikel
Admin1
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
12209 Artikel
Admin1
[quote=Guest,22.01.2007, 10:44]
[/quote]
wenn $doy kleiner gleich 30, addierst du 336 drauf. warum das?
ausserdem solltest du unbedingt
use strict; benutzen.
und für datumsberechnungen gibt es z.b.
Date::Calc
Code: (dl
)
1
2
if ($doy < $archdiff+1) { $doy = $doy+(366-$archdiff); }
if ($testdoy < $doy-$archdiff) {wenn $doy kleiner gleich 30, addierst du 336 drauf. warum das?
ausserdem solltest du unbedingt
use strict; benutzen.und für datumsberechnungen gibt es z.b.
Date::Calc
Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen:Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
lesen:
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem