%a = ( "a" => 1, "b" => 2, "c" => 3 );
$searchKey = "a";
print "Found $searchKey" if defined($a{$searchKey});
-------------------------------------
This mail is from: <[EMAIL PROTECTED]>
-------------------------------------
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
