$h{key} = 0; 
$h{key} ||= "foo"; 
print $h{key};