my @links = $mech->find_all_links_dom(url_regex => 'asdf.html');

foreach my $link (@links) {
    # Neither of the following work either...
    print Dumper($link->__keys);
    print Dumper(keys %$link);
}