En Perl, comment puis-je convertir une chaîne binaire en un entier?

Question

J'ai une chaîne de quatre octets lus à partir d'un fichier binaire, qui est supposé représenter un entier. Comment dervive l'entier?

Exemple:

my $s = '\xa8e2~'; 
my $i = stoi($s); 
printf "%X", $i; #gives "0x7e3265a8" 

La solution C est tout simplement:

fread(&i,4,1,fp); 

Answer 1

$i = unpack("s", $s) peut fonctionner, mais cela dépend de signature/commande non signé et octet afin vous finirez probablement ici: http://perldoc.perl.org/perlpacktut.html#Integers

Answer 2

Regardez le unpack function