$_ = ...; # binary data in $_ my ($id, $secs, $version, $misc, $data) = unpack("a2iia10a9999", $_);