sub get_ids { $id_hashref = shift; map { print "key $_ exists in the request\n" } (keys %{$id_hashref}); }