Select Code to Download

tied(%hash)->WantList("always");
tied(%hash)->WantList("never");
tied(%hash)->WantList("forMultiples");

$first= $hash{key}[0];
# or
$first= $hash{key};
# or
$values= $hash{key};
$first= ref($values) ? $values->[0] : $values;