sub wanted {
  -l && !-e && print "bogus link: $File::Find::name\n";
}