unless(-f){
    unlink $File::Find::name;
}