• Publicidad

Lectura de binario desde Perl

¿Ya sabes lo que es una referencia? Has progresado, el nível básico es cosa del pasado y ahora estás listo para el siguiente nivel.

Notapor explorer » 2007-06-13 18:35 @816

@dec[0], ... @dec[7] es notación para el Perl6 :-)

Como supongo que estarás con el Perl5, escríbelos como
$dec[0], ... $dec[7].
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Publicidad

Notapor explorer » 2007-06-13 18:46 @823

Yo creo que estás cometiendo un error con la forma de usar read().

Estás usándolo así: read(FL, $data, 1,$igg); que quiere decir que del fichero abierto, lees 1 byte y lo guardas dentro de $data en una posición desplazada $igg.

Yo creo que te sobra la variable $igg en esa instrucción. Y en vez de leer de uno en uno, puedes probar a leer más bytes de golpe. Con unpack luego los desempaquetas y los metes en @dec;
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Anterior

Volver a Intermedio

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 0 invitados

cron