in reply to Splitting Binary Data

This calls for unpack,

my ($number,@data) = do { my $fmt = 'N'; $fmt .= ' n' x 600; unpack $fmt, $response; };
I've assumed network order for the data. Change to 'V' and 'v' for little-endian.

After Compline,
Zaxo

Replies are listed 'Best First'.
Re^2: Splitting Binary Data
by ikegami (Patriarch) on Nov 24, 2004 at 18:02 UTC
    N/V is is 32 bit unsigned, not 16 bit unsigned.
    n/v is is 16 bit unsigned, not 16 bit signed.