1) File::Find::find ( { wanted => $wanted, prune => $File::Find::prune }, $fs ) ; 2) File::Find::find ( { wanted => $wanted, prune => +shift }, $fs ) ; 3) File::Find::find ( { wanted => $wanted, prune => $File::Find::prune = shift}, $fs