you need to loop through the keys, comparing $input to each key

That's what exists is for. In this case if ($hash{$input}) { ... } is probably good enough.