function [exx,why]=snag(filename);
% Snag raw bytes from a file and return it with an
% X=vector.

f = fopen(filename, 'r', 'ieee-be');

why=fread(f, 'uint8');
why=why';

fclose(f);
exx=[0:1:length(why)-1];

figure(1);
plot(exx,why, 'k.-');
title('Raw data');

figure(2);
n=hist(why,256);
plot(n);
graph_title=strcat(['Byte value histogram of '  filename]);
title(graph_title);

% print -dpng filename
return