Función Perl vec

Descripción

Esta función usa la cadena EXPR especificada como un vector de enteros sin signo. El parámetro NUMBITS es el número de bits que están reservados para cada entrada en el vector de bits.

Debe ser una potencia de dos de 1 a 32. Tenga en cuenta que el desplazamiento es el marcador del final del vector y cuenta hacia atrás el número de bits especificados para encontrar el inicio. Los vectores se pueden manipular con los operadores lógicos bit a bit |, & y ^.

Sintaxis

A continuación se muestra la sintaxis simple para esta función:

vec EXPR, OFFSET, BITS

Valor devuelto

Esta función devuelve el valor del campo de bits especificado por OFFSET.

Ejemplo

A continuación se muestra el código de ejemplo que muestra su uso básico:

#!/usr/bin/perl -w

$vec = '';
vec($vec,  3, 4) = 1;  # bits 0 to 3
vec($vec,  7, 4) = 10; # bits 4 to 7
vec($vec, 11, 4) = 3;  # bits 8 to 11
vec($vec, 15, 4) = 15; # bits 12 to 15
# As there are 4 bits per number this can
# be decoded by unpack() as a hex number
print("vec() Has a created a string of nybbles, in hex: ", unpack("h*", $vec), "\n");

Cuando se ejecuta el código anterior, produce el siguiente resultado:

vec() Has a created a string of nybbles, in hex: 0001000a0003000f