par tomtom » 13 Mai 2003 20:39
<!-- BBCode Quote Start --><TABLE BORDER=0 ALIGN=CENTER WIDTH=85%><TR><TD><font size=-2>En réponse à:</font><HR></TD></TR><TR><TD><FONT SIZE=-2><BLOCKQUOTE>
<BR>Le 2003-05-13 19:29, Gesp a écrit:
<BR>J'ai plus qu'un truc à faire et tout fonctionne mais là je séche.
<BR>Il s'agit d'écrire en perl les valeurs décimales de VPI et VCI en hexa dans un fichier
<BR>
<BR>J'ai compris qu'il doit s'agir d'un truc approchant cela
<BR>&readhash("/etc/analog/adiusbadsl.conf", %adisettings);
<BR>$adisettings{'VPI'} = printf('%X ', $pppsettings{'VPI'});
<BR>$adisettings{'VCI'} = printf('%X ', $pppsettings{'VCI'});
<BR>&writehash("/etc/analog/adiusbadsl.conf",%adisettings);
<BR>
<BR>sauf que là je ne récupère que des valeurs 1 pour VPI/VCI
<BR>je suis parti d'exemples comme celui-ci mais que je ne comprend pas
<BR>d2h=perl -e "foreach (@ARGV) { printf('%X ', $_); }" $*
<BR> convert decimal to hexa
<BR>
<BR>ou la même chose en plus beau
<BR>for ($i = 0; $i < @ARGV; $i++) {
<BR>printf("%dt= 0x%xn", $ARGV[$i], $ARGV[$i]);
<BR>}
<BR>prompt% d2h 30 50 100
<BR>30 = 0x1e
<BR>50 = 0x32
<BR>100 = 0x64
<BR>
<BR>s'il y a un connaisseur en perl <IMG SRC="images/smiles/icon_bise.gif">
<BR></BLOCKQUOTE></FONT></TD></TR><TR><TD><HR></TD></TR></TABLE><!-- BBCode Quote End -->
<BR>
<BR>
<BR>
<BR>Bien sur puisque la tu recuperes le retour de printf <IMG SRC="images/smiles/icon_smile.gif">
<BR>
<BR>Je te conseille par exemple :
<BR>$adisettings{'VCI'} = uc(sprintf ("%X ", $pppsettings{'VCI'}));
<BR>
<BR>Bon, tu recupères la chaine de caractère, mais comme perl fait pas la différence <IMG SRC="images/smiles/icon_razz.gif">
<BR>
<BR>De plus, ca te suffit probablement <IMG SRC="images/smiles/icon_razz.gif">
<BR>
<BR>tom
<BR>
<BR>
<BR>
<BR>
One hundred thousand lemmings can't be wrong...