what would be the best way to assign each value to a variable name?

Something like this, for example:

my ($long1, $long2, $byte1, $byte2, $double) = unpack 'NNCCd', $raw;
[download]

(of course, choose names as you see fit...)