my @links = $mechObject->links();
foreach my $link (@links) {
   print $link->url;
}