The real WTF here is that

while (@_) { local $_ = shift; $params->{$_} = shift; }
[download]

is used instead of

my %params = @_;
[download]