Select Code to Download

*NAME_MAP
...
*D_NET *3 16
*D_NET *5 8
*D_NET *9 3

#!/usr/bin/perl
  
...
       }
}

Use of uninitialized value in concatenation (.) or string at ./mapping
+.pl line 39, <IHF> line 23

       if (/D_NET/) {
           my @anet = split;
...
              print "$mapping{$n}\n";
           }
       }