Thread THREAD ZUM HEULEN (425 answers)
Opened by Relais at 2003-08-11 16:34

Ishka
 2004-07-27 20:16
#20522 #20522
User since
2003-08-04
771 Artikel
HausmeisterIn
[Homepage] [default_avatar]
Mein Programm mag mich nicht. Es verschickt gerade tausende leere Datenpackete - dh. nur mit Header. Wär ansich noch nicht so ein schlimmer Fehler, aber dahinter wartet bestimmt schon der nächste, nachdem ich gerade durch zig Fehler durchgelatscht bin (vergessen port anzugeben, auf das Ende einer while(defined)-Schleife gewartet, wobei die Varable in der Schleife nur mit .= verändert wurde..). Ich glaube das ist nicht so ganz mein Programmiertag..
sub z{if(@_){1while$x[$k=rand 10];t($t=$x[$k]=1)}print map"$z[$x[$_]]$_".($_%3?
"":"\n"),1..9}sub t{$j=0;$x[$_+1]==$t&&($j+=2**$_)for 0..8;z,die"Gewinner $z[$t]
"if grep$_==($j&$_),7,56,73,84,146,273,292,448;z,die"Gleichstand\n"if@x>9&&!grep
!$_,@x}@x=4;@z=qw{. [ (};z$^T&1;while(<>){next if$_>9||$x[$_];t$t=$x[$_]=2;z 1}
Antworten mit Zitat

View full thread THREAD ZUM HEULEN