• [^] # Re: Notificateur X

    Posté par . En réponse au journal Notificateur X. Évalué à 1.

    Je sais bien, mais en même temps, c'est bien sympa d'avoir de la viande très fraiche dans sa linuxette..
    de toute façon:

    #!/usr/bin/perl5.8.1
    2 $text = shift;
    3 use Text::Wrap;
    4 open(F,"|osd_cat -s 4 -l 20 -p top -A center -c yellow -f \"-microsoft-comic sans ms-medium-r-normal -*-50-*-*-*-p-*-microsoft-cp1251\" -");
    5
    6 $Text::Wrap::columns = 30;
    7 print F wrap('','',$text);


    ( pas de remarque sur la police :o) )