.\" Automatically generated by Pod::Man v1.34, Pod::Parser v1.13
.\" ========================================================================
.de Sh \" Subsection heading
.de Sp \" Vertical space (when we can't use .PP)
.de Vb \" Begin verbatim text
.de Ve \" End verbatim text
.\" Set up some character translations and predefined strings. \*(-- will
.\" give an unbreakable dash, \*(PI will give pi, \*(L" will give a left
.\" double quote, and \*(R" will give a right double quote. | will give a
.\" real vertical bar. \*(C+ will give a nicer C++. Capital omega is used to
.\" do unbreakable dashes and therefore won't be available. \*(C` and \*(C'
.\" expand to `' in nroff, nothing in troff, for use with C<>.
.ds C+ C\v'-.1v'\h'-1p'\s-2+\h'-1p'+\s0\v'.1v'\h'-1p'
. if (\n(.H=4u)&(1m=24u) .ds -- \(*W\h'-12u'\(*W\h'-12u'-\" diablo 10 pitch
. if (\n(.H=4u)&(1m=20u) .ds -- \(*W\h'-12u'\(*W\h'-8u'-\" diablo 12 pitch
.\" If the F register is turned on, we'll generate index entries on stderr for
.\" titles (.TH), headers (.SH), subsections (.Sh), items (.Ip), and index
.\" entries marked with X<> in POD. Of course, you'll have to process the
.\" output yourself in some meaningful fashion.
. tm Index:\\$1\t\\n%\t"\\$2"
.\" For nroff, turn off justification. Always turn off hyphenation; it makes
.\" way too many mistakes in technical documents.
.\" Accent mark definitions (@(#)ms.acc 1.5 88/02/08 SMI; from UCB 4.2).
.\" Fear. Run. Save yourself. No user-serviceable parts.
. \" fudge factors for nroff and troff
. ds #H ((1u-(\\\\n(.fu%2u))*.13m)
. \" simple accents for nroff and troff
. ds ' \\k:\h'-(\\n(.wu*8/10-\*(#H)'\'\h"|\\n:u"
. ds ` \\k:\h'-(\\n(.wu*8/10-\*(#H)'\`\h'|\\n:u'
. ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'^\h'|\\n:u'
. ds , \\k:\h'-(\\n(.wu*8/10)',\h'|\\n:u'
. ds ~ \\k:\h'-(\\n(.wu-\*(#H-.1m)'~\h'|\\n:u'
. ds / \\k:\h'-(\\n(.wu*8/10-\*(#H)'\z\(sl\h'|\\n:u'
. \" troff and (daisy-wheel) nroff accents
.ds : \\k:\h'-(\\n(.wu*8/10-\*(#H+.1m+\*(#F)'\v'-\*(#V'\z.\h'.2m+\*(#F'.\h'|\\n:u'\v'\*(#V'
.ds 8 \h'\*(#H'\(*b\h'-\*(#H'
.ds o \\k:\h'-(\\n(.wu+\w'\(de'u-\*(#H)/2u'\v'-.3n'\*(#[\z\(de\v'.3n'\h'|\\n:u'\*(#]
.ds d- \h'\*(#H'\(pd\h'-\w'~'u'\v'-.25m'\f2\(hy\fP\v'.25m'\h'-\*(#H'
.ds D- D\\k:\h'-\w'D'u'\v'-.11m'\z\(hy\v'.11m'\h'|\\n:u'
.ds th \*(#[\v'.3m'\s+1I\s-1\v'-.3m'\h'-(\w'I'u*2/3)'\s-1o\s+1\*(#]
.ds Th \*(#[\s+2I\s-2\h'-\w'I'u*3/5'\v'-.3m'o\v'.3m'\*(#]
.ds ae a\h'-(\w'a'u*4/10)'e
.ds Ae A\h'-(\w'A'u*4/10)'E
. \" corrections for vroff
.if v .ds ~ \\k:\h'-(\\n(.wu*9/10-\*(#H)'\s-2\u~\d\s+2\h'|\\n:u'
.if v .ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'\v'-.4m'^\v'.4m'\h'|\\n:u'
. \" for low resolution devices (crt and lpr)
.if \n(.H>23 .if \n(.V>19 \
.\" ========================================================================
.TH File::Path 3 "2002-06-01" "perl v5.8.0" "Perl Programmers Reference Guide"
File::Path \- create or remove directory trees
\& mkpath(['/foo/bar/baz', 'blurfl/quux'], 1, 0711);
\& rmtree(['foo/bar/baz', 'blurfl/quux'], 1, 1);
The \f(CW\*(C`mkpath\*(C'\fR function provides a convenient way to create directories, even
if your \f(CW\*(C`mkdir\*(C'\fR kernel call won't create more than one level of directory at
a time. \f(CW\*(C`mkpath\*(C'\fR takes three arguments:
the name of the path to create, or a reference
to a list of paths to create,
a boolean value, which if \s-1TRUE\s0 will cause \f(CW\*(C`mkpath\*(C'\fR
to print the name of each directory as it is created
(defaults to \s-1FALSE\s0), and
the numeric mode to use when creating the directories
It returns a list of all directories (including intermediates, determined
using the Unix '/' separator) created.
If a system error prevents a directory from being created, then the
\&\f(CW\*(C`mkpath\*(C'\fR function throws a fatal error with \f(CW\*(C`Carp::croak\*(C'\fR. This error
can be trapped with an \f(CW\*(C`eval\*(C'\fR block:
\& eval { mkpath($dir) };
\& print "Couldn't create $dir: $@";
Similarly, the \f(CW\*(C`rmtree\*(C'\fR function provides a convenient way to delete a
subtree from the directory structure, much like the Unix command \f(CW\*(C`rm \-r\*(C'\fR.
\&\f(CW\*(C`rmtree\*(C'\fR takes three arguments:
the root of the subtree to delete, or a reference to
a list of roots. All of the files and directories
below each root, as well as the roots themselves,
a boolean value, which if \s-1TRUE\s0 will cause \f(CW\*(C`rmtree\*(C'\fR to
print a message each time it examines a file, giving the
name of the file, and indicating whether it's using \f(CW\*(C`rmdir\*(C'\fR
or \f(CW\*(C`unlink\*(C'\fR to remove it, or that it's skipping it.
(defaults to \s-1FALSE\s0)
a boolean value, which if \s-1TRUE\s0 will cause \f(CW\*(C`rmtree\*(C'\fR to
skip any files to which you do not have delete access
(if running under \s-1VMS\s0) or write access (if running
under another \s-1OS\s0). This will change in the future when
a criterion for 'delete permission' under OSs other
than \s-1VMS\s0 is settled. (defaults to \s-1FALSE\s0)
It returns the number of files successfully deleted. Symlinks are
simply deleted and not followed.
\&\fB\s-1NOTE:\s0\fR If the third parameter is not \s-1TRUE\s0, \f(CW\*(C`rmtree\*(C'\fR is \fBunsecure\fR
in the face of failure or interruption. Files and directories which
were not deleted may be left with permissions reset to allow world
read and write access. Note also that the occurrence of errors in
rmtree can be determined \fIonly\fR by trapping diagnostic messages
using \f(CW$SIG{_\|_WARN_\|_}\fR; it is not apparent from the return value.
Therefore, you must be extremely careful about using \f(CW\*(C`rmtree($foo,$bar,0\*(C'\fR
in situations where security is an issue.
Tim Bunce <\fITim.Bunce@ig.co.uk\fR> and
Charles Bailey <\fIbailey@newman.upenn.edu\fR>
projects / OpenSPARC-T2-DV / blob