open(STDOUT, '>', "dump.out") || die "cannot redirect stdout";
[download]

redirects STDOUT to dump.out

see perldoc -f open