Select Code to Download

    return if not ... a cheap test...;
    return if not ... a more expensive test..;
    my $foo = ..initialization...;
    ...body of sub routine ...

return exists $hash{$a}{$key}?$hash{$a}{$key} : undef;
return $hash{$a}{$key}; # instead of above