sub FU { return { qw[ a b c d ] }->{$_[0]}; } die FU('a'); __END__ b at - line 5.