There's no reason to use split either...

my ($file) = $url =~ m!([^/]*)$!;
[download]

-sauoq
"My two cents aren't worth a dime.";