Select Code to Download

sub wanted {
    /^\.nfs.*$/ &&
...
    $dev < 0 &&
    ($File::Find::prune = 1);
}

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