Your Solution is another new thing for me but I am bit paranoid about using "$seen", as looking at your code you are using $seen as a hash. But while declaring if I define "seen" as

my %seen
[download]

That give me error but if I declare it as a $seen variable it works and that makes me confuse. Any Suggestion?Please. Cheers