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

##</code><code>##

my %packet_fields = (
   $Idents{ Format_7 }    => [qw(    ident
            flags
            x
...]


##</code><code>##

   $Idents{ Format_7 } => qw(ident
                RDP_Ident
                Radar_Site_Ident
                site_x

##</code><code>##

 $Idents{ Format_7 } => [qw(ident
                RDP_Ident
                Radar_Site_Ident
                site_x
... ]