#include <hallo.h> Janto Trappe wrote on Thu Apr 11, 2002 um 05:17:24PM:
> #!/usr/bin/perl > $s=$ENV{"HOME"}."/.sigs";open(S,"$s")||die;$p[0]=0;while(<S> > ){$p[$#p+1]=tell if/^$/;}seek(S,$p[int rand($#p+.9999)],'see > k_set')||die;while(<S>){last if/^$/;$z.=$_;}close S;print$z; Eine andere Version... die Signaturen sind durch -- getrennt, das Skript fork't sich und läuft im Hintergrund. Sehr simpel kann man auch fortunes dafür nehmen: mkfifo .signature (while fortunes > .signature; do sleep 1; done) & Gruss/Regards, Eduard. -- >Actually, Microsoft is sort of a mixture between the Borg and the Ferengi. Das stimmt so nicht - die Borg wissen wenigstens, wie ein Netzwerk auszusehen hat.
msg05668/pgp00000.pgp
Description: PGP signature