Select Code to Download

print "$entry\n";

    print "  Name: ", $entry->{name}, 
          " Reference: ", $entry->{reference}, "\n";

K988777
  Name: LOE Reference: 9887hhh
...

12349
  Name: RIC Reference: 00y77676