Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?

Re: File::Find

by larryl (Scribe)
on Mar 14, 2001 at 01:13 UTC ( #64213=note: print w/replies, xml ) Need Help??

in reply to File::Find

I find myself using File::Find more and more now that I've got the hang of it. Typically you set up like so:

use File::Find; find( \&do_stuff, $from_dir );
and do_work() is the place where all the real work gets done.

A couple caveats that I've found (the hard way...) about what you can do inside do_work():

  • Don't change $_ inside do_work(). If you want to, save a copy on entry and change it back before returning.
  • As Corion mentions, the working directory is changed to each recursed directory under your starting point. If you change directories inside do_work(), save a copy of the current directory on entry and chdir back to it before returning.
  • The usual file test operator caveats apply, for example -f $File::Find::name and -l $File::Find::name are both true if the file is a symlink to another file. If you're interested in symbolic links, test for those first, before you test for file- or directory-ness.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://64213]
and the rats come out to play...

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (4)
As of 2018-04-22 22:21 GMT
Find Nodes?
    Voting Booth?