And that two-level map is probably crazier than you need:

return $env =~ /^(.*?)=(.*)/gm;
[download]

Create fewer intermediate SVs and regex calls that way.

-- Randal L. Schwartz, Perl hacker