> > What does the perl doc on your cygwin system say on find() ?
>
> Mine says:
>
> --snip--
File::Find(3) User Contributed Perl Documentation
File::Find(3)
NAME
File::Find - Traverse a directory tree.
SYNOPSIS
use File::Find;
find(\&wanted, @directories_to_search);
sub wanted { ... }
use File::Find;
finddepth(\&wanted, @directories_to_search);
sub wanted { ... }
use File::Find;
find({ wanted => \&process, follow => 1 }, '.');
DESCRIPTION
These are functions for searching through directory trees doing work
on
each file found similar to the Unix find command. File::Find exports
two functions, "find" and "finddepth". They work similarly but have
subtle differences.
find
find(\&wanted, @directories);
find(\%options, @directories);
"find()" does a depth-first search over the given @directories in
the order they are given. For each file or directory found, it
calls the &wanted subroutine. (See below for details on how to
use
the &wanted function). Additionally, for each directory found,
it
will "chdir()" into that directory and continue the search,
invok-
ing the &wanted function on each file or subdirectory in the
direc-
tory.
finddepth
finddepth(\&wanted, @directories);
finddepth(\%options, @directories);
"finddepth()" works just like "find()" except that is invokes the
&wanted function for a directory after invoking it for the direc-
tory's contents. It does a postorder traversal instead of a pre-
order traversal, working from the bottom of the directory tree up
where "find()" works from the top of the tree down.
D:\Users\hill\R3.14\epics\base>perl -v
This is perl, v5.8.7 built for cygwin-thread-multi-64int
Copyright 1987-2005, Larry Wall
Perl may be copied only under the terms of either the Artistic License or
the
GNU General Public License, which may be found in the Perl 5 source kit.
Complete documentation for Perl, including FAQ lists, should be found on
this system using `man perl' or `perldoc perl'. If you have access to the
Internet, point your browser at http://www.perl.org/, the Perl Home Page.
D:\Users\hill\R3.14\epics\base>which perldoc
/usr/bin/perldoc
> -----Original Message-----
> From: Ralph Lange [mailto:[email protected]]
> Sent: Monday, November 28, 2005 8:46 AM
> To: [email protected]
> Subject: Re: [Fwd: RE: R3.14.8 makeBaseApp.pl]
>
> Ralph Lange wrote:
>
> > [...]
> >
> > What does the perl doc on your cygwin system say on find() ?
>
> Mine says:
>
> aragon: ...> perldoc File::Find
>
> File::Find(3) User Contributed Perl Documentation
> File::Find(3)
>
> NAME
> File::Find - Traverse a directory tree.
>
> SYNOPSIS
> use File::Find;
> find(\&wanted, @directories_to_search);
> sub wanted { ... }
>
> use File::Find;
> finddepth(\&wanted, @directories_to_search);
> sub wanted { ... }
>
> use File::Find;
> find({ wanted => \&process, follow => 1 }, '.');
> [...]
>
>
> which would make the change legal perl code.
>
> Ralph
- Replies:
- Re: R3.14.8 makeBaseApp.pl - File::Find problem on cygwin Ralph Lange
- References:
- Re: [Fwd: RE: R3.14.8 makeBaseApp.pl] Ralph Lange
- Navigate by Date:
- Prev:
Re: [Fwd: RE: R3.14.8 makeBaseApp.pl] Ralph Lange
- Next:
Re: Mantis bugs Andrew Johnson
- Index:
2002
2003
2004
<2005>
2006
2007
2008
2009
2010
2011
2012
2013
2014
2015
2016
2017
2018
2019
2020
2021
2022
2023
2024
- Navigate by Thread:
- Prev:
Re: [Fwd: RE: R3.14.8 makeBaseApp.pl] Ralph Lange
- Next:
Re: R3.14.8 makeBaseApp.pl - File::Find problem on cygwin Ralph Lange
- Index:
2002
2003
2004
<2005>
2006
2007
2008
2009
2010
2011
2012
2013
2014
2015
2016
2017
2018
2019
2020
2021
2022
2023
2024
|