Discussion :

[Caine]

Existe-t-il un équivalent en Perl de la fonction C scanf afin de formater l'entrée standard? Car je souhaite saisir de très grand nombre, et en hexadécimal c'est plus pratique.

D'avance merci.

PS: J'ai cherché dans la FAQ PErl, et le seul sujet intitulé "entrée standard" parle en fait de printf.

J'ai essayé scanf, vu que printf existe mais le script ne marche pas.

[MarneusCalgarXP]

à ma connaissance, il n'existe pas de fonctions d'entrée en perl, il suffit de formatter soi même:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
use strict;
use warnings;
 
#on lit l'entrée standard
chomp(my $input = <STDIN>);
# on formatte en hexa
my $result = hex('0x' . $input); 
# on affiche le résultat
print("valeur : $result\n");

[Caine]

Merci,

J'avais espoir vu qu'il existait printf. Effectivement ta solution est la bonne. Mais c'est dommage tout de même de ne pas pourvoir formater stdin comme en C.

[MarneusCalgarXP]

Rien ne t'empèche de coder ta propre méthode scanf...

[Jedai]

En fait scanf est un parent pauvre des regexs, donc tout ce que tu peux faire avec scanf tu peux le faire de façon plus souple avec une regex appliquée à l'entrée.

--
Jedaï

[Caine]

Effectivement, il m'a suffit de faire:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
hex(stdin);

Mais par exemple pour

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
scanf ("%s %d %s %d",&Nom,&Age,&Prenom,&Telephone);

La regexp sur l'entrée ne me vient pas immédiatement.