my @array_code= qw(WE4321 PP7654 8973 7865 TT3422);

my %code_numbers = (
  "4321" =>"XX",
  "7654" => "BB",
  "8973" => ""
);
  
# Using the number part only of the array elements (@array_code), how to search for a match into the hash %code_numbers and print
# results like:  WE4321 XX
#                PP7654 BB
# if value is empty like will be for this 
#                8973
# add "IN",and get it like this:
#                8973   IN