join '',
               pack('N', int($index)),
               pack('N', $index =~ /\.(\d+)/),
               sprintf('%02d', $flagValue),
               pack('N', $#restore)