• [^] # Re: Nouveau programme

    Posté par . En réponse à la dépêche Après Adobe, Palm Computing.. Évalué à -1.

    Si c'est du GPL, voila une nouvelle version:


    -------------- CUT HERE ----------------

    #!/usr/bin/perl
    open(RANDOM, "/dev/urandom");
    # Une boucle infinie, c mieux
    while($line = <RANDOM>) {
    print "Palm Inc. sux ".$line." !\n";
    };
    exit(0);

    --------------------- /CUT HERE -------------

    Pour un meilleur effet:

    ./script | mutt .....

    (Pour le thread d'au dessus, regardez le gros smiley :-))
    --
    moi, -1