[E|B,10.08.2003, 16:21]Gute Idee, leider kann ich das so nicht machen, da es ein Counter werden soll und der Administrator nicht weiß, wie viele Stellen es sind. Ich MUSS es also mit einem <img> Tag ausgeben. Und genau das ist ads Problem. Weiß jemand wie man das am besten macht?
Du kannst doch mit einem SSI auch mehrere <img />-Tags ausgeben lassen.
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}