Select Code to Download

foreach my $structure_type (@{$ref{ICD_Description}{MsgData}{MsgDataRe
+gion}{Msg_Data}{Array}{StructureType}}) {
   print "$structure_type{DataLine}{DataField}\n";
}