my %packet_fields = (
  $Idents{ Format_7 }    => qw(    ident
           flags