Re: Splitting Binary Data

use strict;
use LWP::Simple;

my $bindata = get('http://home.iwcg.net/spectrum.bin');

my ($index,@data) = unpack('Ss*', $bindata);
my $count = @data;

print "index: '$index'\n";
print "data [$count]: @data\n";
[download]

Comment on Re: Splitting Binary Data Download Code

Replies are listed 'Best First'.
Re^2: Splitting Binary Data by ikegami (Patriarch) on Nov 24, 2004 at 18:01 UTC
Warning: `unpack 's'` and `unpack 'S'` are not portable. That's why I recommended the use of `unpack 'n'` or `unpack 'v'`.	[reply] [d/l] [select]
Re^3: Splitting Binary Data by trammell (Priest) on Nov 24, 2004 at 19:00 UTC
Yes, I did notice that. My perldoc also has 'n' and 'v' as both unsigned; the OP may have problems with this as well. A (long) while ago in grad school I was generating some data files containing a bunch of ints, and I was saving them in binary format. One of the better professors I worked with suggested I just save the data as ASCII text; admittedly there is a lot of space wasted, but ASCII portability is much less of an issue. He was right.	[reply]
Re^4: Splitting Binary Data by ikegami (Patriarch) on Nov 24, 2004 at 19:11 UTC
Numbers as text is indeed more portable... unless you happen to have a system that uses EBCDIC, UNICODE, etc. Enter HTML and XML, which allow you to specify the encoding. So what's simpler? Using XML, converting the ASCII to your platform's encoding, or specifying that the numbers are little-endian? As for 'n' and 'v' being unsigned, that's why my solution above isn't as compacts as the others (but it works and it's portable!)	[reply]