Opened by ema at 2006-06-09 11:02
User since
2006-06-09
8 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2006-06-09
8 Artikel
BenutzerIn
@nepos
vileicht soltest du meine vorherige antwort etwas besser durch lesen.
QuoteDann wuerd ich die oben genannten Module mal versuchen.
vileicht soltest du meine vorherige antwort etwas besser durch lesen.
#!/usr/bin/perl
my $now=time,$sec=0;$|=1; while(1){if($now!=time){$now=time;if($sec==360){print "KuckKuck"; $sec=0;}else{print "TickTack";}$sec++;}}
my $now=time,$sec=0;$|=1; while(1){if($now!=time){$now=time;if($sec==360){print "KuckKuck"; $sec=0;}else{print "TickTack";}$sec++;}}