print "UID is $uid, skipping $File::Find::name\n";
__END__
UID is 0, skipping /home/zackse/.kde