Thread Perl Wiki
(13 answers)
Opened by BrownWolf at 2003-09-08 04:48
[quote=havi,08.09.2003, 09:19]Ich hab jetzt auch ein bißchen herum gesucht, konnte aber den Punkt "Zwischengeparkt", so hieß er zumindestens früher nicht finden!
Ist alles was früher unter open.ionix.de in "Zwischengeparkt" war einfach weg ? Außerdem waren/sind unter open.ionix.de z.B. in "Strings" 6 Beiträge vorhanden auf http://wiki.perl-community.de/bin/view/Wissensbasis/FaqStrings sind es aber nur mehr 5 !? Gruss[/quote] Jo, Strats 'Wie erstelle ich eine Automatische Linkliste' fehlt. Ich weiß nciht, ob es mit http://www.fabiani.net/tips/perl/code/uri2link.shtml übereinstimmt. 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} |