Problemer med tid
hvorfor skriver den ikke "av" ved skiftet mellem f.eks 56 til 9?den skriver bare "av" når den er ved 0 og derefter ved 1.
#!/perl/bin/perl
print "Content-type: text/html\n\n";
@time = localtime(time);
open(TIME,"tid.txt");
@tid = <TIME>;
close(TIME);
if ($time[0] > @tid) {
print "hej";
}
else {
print "av";
}
open(TID,">tid.txt");
print TID "$time[0]\n";
close(TID);
print "$time[0]";
takker for svar.
