# added exists check
perl -MData::Rmap=rmap_hash -le 'rmap_hash {print keys %{$_->{a}} if exists $_->{a} } ({a=>{1,2}})'
1