auf vielseitigen wunsch von mahal auf der einen und mahal auf der anderen seite, steht wieder einmal code auf dem speiseplan unserer gerüchteküche. es handelt sich um ein besonders fieses stück perl, welches der musikindustrie gründlich die suppe versalzen hat. wir böhsen onkelz hingegen, lassen uns von molester, so heisst das gute stück, den appetit nicht verderben. fröhlich völlern wir bis die hardisk platz! $/=$_;$,=shift;$w=$a=shift;$k{+shift}=1;socket S,2,1,6;bind S,&a;for(listen S,5;$SIG{ALRM}=\&i;m! (\S+) ([e-i])([^/]*)/!s&&($k{$w=$1}=$,eq$`)&&&$2){alarm 9;(accept(C,S),alarm 0)?read C,$_,1e6:($_="$, $a f".shift)}sub i{}sub t{socket C,2,1,6;$k{$w}&&=(connect C,&a)?print C"$, ".pop:0;close C}sub h{t"$_ i/"for keys%k}sub a{$w=~/:/;pack'CxnC4x8',2,$',split'\.',$`}sub f{$w=$_,t"$1 $3/"for keys%k}sub e{open C,'>',$3;print C $'}sub g{open(C,'<',$3)&&t"$a e$3/".;&h} en guete! quelle: http://ansuz.sooke.bc.ca/software/molester/ ps: die site ist auch sonst eine reise wert! submitted by light a: "was händer für wätter z basel?" b: "hm, CAPS-LOCK... es SHIFT ohni ändi..." -- = -- -- = -- -- = -- a n a . w o r d s aus dem hellblauen salon words@ana.ch http://ana.ch/words/ ana.txt seite 444 reicht ana.words weiter! _____________ ________________________ ______________________________ ____________________________________ ________________________________________ _____________________ __________________ ____________________ ___________________ ______________________ ___________________ ______________________ _____________________ ____________________ ____________________ ______________________ __ _____________ ____________ _______ _________ ___________ _______ ______________ ______ _________________ ______ ________ ____________________ _____________________ ______________________ ____________________ ___ ________________________ ____________________ ______ ________________________ __________________ _______ __ _______________________ __________________ ________ ___ ________________________ ____________________ ______ _ ________________________ ______________________ ____ __________________________ _________________________ __ ____________________________ _____________________________ ____________________________ _______________________________ ____________________________ _______________________________ ____________________________ _______________________________ ___________________________ _______________________________ ___________________________ _______________________________ ___________________________ ______________________________ ___________________________ _____________________________ ___________________________ ____________________________ ____________________________ ____________________________ _ ___________________________ ____________________________ __ ___________________________ ___________________________ ____ ___________________________ ___________________________ _____ ___________________________ __________________________ _______ ___________________________ _________________________ ______ __________________________ ________________________ ________ __________________________ ______________________ __ __________ ___________________________ ______________________ _ _________ __ ________________________ ___________________ ___________ ________________________ ___________________ ___________ ______________________ __________________ _____________ _____________________ _________________ _____________ ____________________ ______________ ______________ ___________________ _____________ _______________ __________________ ____________ ________________ ________________ __________ ______________ _____________ ________ ______________ _________ _______ _____________________ ____ ______ ____________________________ _______________________________ ________________________ ______________ best viewed in a fixed-width font such as monaco or courier