Retourner aux forums || Retourner au forum Programmation.perl
Programmation.perl : écrire en binaire
Posté par Nicolas Boulay () le 14 octobre 2004simple :
while(<>)
{
while (/([0-9|a-f]+)\s*/g)
{
syswrite (STDOUT,$1);
}
}
malheureusement, il ne me sort pas du binaire ! J'ai trouver plein de doc sur comment lire du binaire mais pas comment en écrire !
(j'espère juste ne pas à avoir à utiliser pack et unpack...)
> Lire le message (1 commentaire, moyenne: 3).
gni ?
Ca me parait simple : qu'est-ce que du binaire sinon écrire un nombre en "brut" : tu veux écrire le nombre 224, tu balances le code ascii 224 dans le fichier..
Tu veux écrire 123456, tu sépare ce nombre en deux octets (avec un décalage de 8) et en brut dans ton fichier
je vois pas trop ou est le problème..
il suffit de parser ton nombre en hexa pour le mettre dans un octet, un mot, etc... et l'enregistrer tel quel dans ton fichier...
2EFA3 -> mavar = 2*16^5+14*16^4+15*16^3+10*16^2+3*16
apres je sais pas, j'ai jamais fait de perl
ok je ------> []
Revenir en haut de page || Retourner aux forums || Retourner au forum Programmation.perl



Cette discussion est archivée, il n'est plus possible de laisser des commentaires.
Note : les commentaires appartiennent à ceux qui les ont postés. Nous n'en sommes pas responsables.