Vraag : Hoe te om een binair dossier in het koord van de Hexuitdraai om te zetten? (Perl)

Deskundigen,

how zet ik een binair dossier in om een hexuitdraaikoord in Perl?

not-so-working- voorbeeld: open

(BS_FILE, $bs_file_bin) of matrijs „kan geen $bs_file_bin openen: $! “;

binmode (BS_FILE);

@lines = ;
voor $line (@lines) {/> chomp $line mijn $int = pakt uit („N“, pak („B32“, substr („0“ x 32. $line, -32)));
mijn $hex = sprintf („%x“, $int);

druk STDOUT „$hex \ n“;

}

Antwoord : Hoe te om een binair dossier in het koord van de Hexuitdraai om te zetten? (Perl)

Ik denk de kwestie is dat u zich met binmode mengt.
Probeer dit… het schijnt om voor me te werken.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:

strikt gebruik;

mijn $bs_file_bin = „/tmp/bf“;

open (BS_FILE, $bs_file_bin)  of matrijs „kan geen $bs_file_bin openen: $! “;
binmode (BS_FILE);

mijn $data;
terwijl (gelezen (BS_FILE, $data, 4)) {
   mijn $int = pakt uit („N“, $data);
   mijn $hex = sprintf („%08X“, $int);
   druk STDOUT „$hex \ n“;
}
Andere oplossingen  
 
programming4us programming4us