for (keys %links) {
  if ($links{$_}{visited}) {
   #....
  }
}