Le Lundi 7 Janvier 2002 19:46, vous avez écrit :
> Bonjour à tous,
>
> excusez pour le hs, ce soir la liste n'est pas trop chargee
>
> je tente d'experimenter le perl. avant d'acheter le mega bouquin d'O reilly
> a pres de 300F pardon...environ 45 euros ,j'aimerais faire fonctionner
> un petit script que j'ai trouve dans linux mag.
>
> ma config mdk-8.0 et perl d'origine, (paquetage perl-base 5.600.30mdk)
>
> deja kpakage m'indique une difference d'attribut de fichier
> entre /usr/bin/sperl5.6.0 et /usr/bin/suidperl je ne sais pas
> si c'est important?
> c'est 'sperl qui n'est pas setuid/setgid in suidperl.'
>
> mon probleme :
> pour le script ci apres je recupère
> les messages d'erreurs suivants:
> pour 1 et 2 je ne vois pas du tout, je declare des variables il n'en veut
> pas pour 3 j'ai modifie la ligne autant que j'ai pu sans résultat.
>
> si qq a un debut de piste merci
>
> André
>
> -------message d'erreurs---------------------------
> [dede@localhost LOTO]$ ./loto.pl
>
> 1-> ./loto.pl: use: command not found
> 2-> ./loto.pl: use: command not found
> 3->./loto.pl: line 7: syntax error near unexpected token `('
> ./loto.pl: line 7: `for ( $i = 1 ; i <= 49 ; $i++ ) {'
>
>
> --------------script--linux mag N°34-------------
>
> #!/usr/bin/perl -w
>
> use strict ;
> use vars qw/ @boule$i / ;
>
> for ( $i = 1 ; i <= 49 ; $i++ ) {
> $boule [ $i ] = 0 ;
> }
>
> while (<>) {
> my $ligne = $_;
>
> my ($even, $date, $tirage, $b1, $b2, $b3, $b4, $b5, $b6,
> $bc)=split(';',$ligne);
>
> chomp ($b1,$b2,$b3,$b4,$b5,$b6,$bc);
>
> $boule[$b1]=$boule[$b1]+1 ;
> $boule[$b2]=$boule[$b2]+1 ;
> $boule[$b3]=$boule[$b3]+1 ;
> $boule[$b4]=$boule[$b4]+1 ;
> $boule[$b5]=$boule[$b5]+1 ;
> $boule[$b6]=$boule[$b6]+1 ;
>
> for ($i=1;$i <= 49 ; $i++) {
> print "$boule[$i]:$i\n";
> }
>
> $ cat loto | ./loto.pl | less
> ------------------------fin du script--------------------------
ta ligne shebang, cad celle commençant par #! et définissant l'interpréteur,
est-elle bien la toute première ligne du script? parce qu'apparemment, il
n'est pas interprété comme un script perl, mais directement par ton
terminal...
c'est une règle absolue à tous les scripts, pour que l'interpréteur soit bien
celui spécifié dans la ligne shebang, cette ligne doit être la première, sans
ligne vide ou commentée avant.....
bye
jipe
--
Si la connerie était cotée en bourse,tu serais incarcéré pour
délit d'initié...
-+- EB in: Guide du Cabaliste Usenet - Les initiés ont la cote -+-
Vous souhaitez acquerir votre Pack ou des Services MandrakeSoft?
Rendez-vous sur "http://www.mandrakestore.com";
