Funzione Perl vec

Descrizione

Questa funzione utilizza la stringa specificata EXPR come vettore di interi senza segno. Il parametro NUMBITS è il numero di bit riservati per ciascuna voce nel vettore di bit.

Deve essere una potenza di due da 1 a 32. Notare che l'offset è il marker per la fine del vettore e conta a ritroso il numero di bit specificato per trovare l'inizio. I vettori possono essere manipolati con gli operatori logici bit per bit |, & e ^.

Sintassi

Di seguito è riportata la semplice sintassi per questa funzione:

vec EXPR, OFFSET, BITS

Valore di ritorno

Questa funzione restituisce il valore del campo bit specificato da OFFSET.

Esempio

Di seguito è riportato il codice di esempio che mostra il suo utilizzo di base:

#!/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");

Quando viene eseguito il codice sopra, produce il seguente risultato:

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