map: fix up "perl 5.10 giveth, 5.18 taketh away" stuff!