%data = ( um => 'one', dois => 'two', tres => 'tres' ); RULES translate (\w+)=e=>$data{$1}!!exists($data{$1})