my %fields; @fields{qw( ... total timestamp ... )} = unpack(...);