sub foo{
	for($_[0]){
		$_=$_;
	}
}
foo($hash{'a'});
print exists $hash{'a'}?'yes':'no';
#no