http://www.foo.bar/index.html
   http://www.foo.bar/index.html#foo
   http://www.foo.bar/index.html#bar
##</code><code>##

   my @pri = grep {!$seen{$_} ++} @links;