Most likely $page is missing a leading http://. Try to print it before retrieving the URL.

The removal of duplicates seems to work:

use strict;
use warnings;
use Data::Dumper;

my @list = qw(a b c d a a b e);

my %seen;

@seen{@list} = ();

print Dumper [ sort keys %seen ];
[download]