package MYPACKAGE; [...] my ($ab, $cd, $ef, ..., $yz) = map { ... some function of $_ ... } ('ab', 'cd', ..., 'yz');