local-lib5/man/man3/File::Copy::Recursive.3pm

   1 .\" Automatically generated by Pod::Man v1.37, Pod::Parser v1.3
   2 .\"
   3 .\" Standard preamble:
   4 .\" ========================================================================
   5 .de Sh \" Subsection heading
   6 .br
   7 .if t .Sp
   8 .ne 5
   9 .PP
  10 \fB\\$1\fR
  11 .PP
  12 ..
  13 .de Sp \" Vertical space (when we can't use .PP)
  14 .if t .sp .5v
  15 .if n .sp
  16 ..
  17 .de Vb \" Begin verbatim text
  18 .ft CW
  19 .nf
  20 .ne \\$1
  21 ..
  22 .de Ve \" End verbatim text
  23 .ft R
  24 .fi
  25 ..
  26 .\" Set up some character translations and predefined strings.  \*(-- will
  27 .\" give an unbreakable dash, \*(PI will give pi, \*(L" will give a left
  28 .\" double quote, and \*(R" will give a right double quote.  | will give a
  29 .\" real vertical bar.  \*(C+ will give a nicer C++.  Capital omega is used to
  30 .\" do unbreakable dashes and therefore won't be available.  \*(C` and \*(C'
  31 .\" expand to `' in nroff, nothing in troff, for use with C<>.
  32 .tr \(*W-|\(bv\*(Tr
  33 .ds C+ C\v'-.1v'\h'-1p'\s-2+\h'-1p'+\s0\v'.1v'\h'-1p'
  34 .ie n \{\
  35 .    ds -- \(*W-
  36 .    ds PI pi
  37 .    if (\n(.H=4u)&(1m=24u) .ds -- \(*W\h'-12u'\(*W\h'-12u'-\" diablo 10 pitch
  38 .    if (\n(.H=4u)&(1m=20u) .ds -- \(*W\h'-12u'\(*W\h'-8u'-\"  diablo 12 pitch
  39 .    ds L" ""
  40 .    ds R" ""
  41 .    ds C` ""
  42 .    ds C' ""
  43 'br\}
  44 .el\{\
  45 .    ds -- \|\(em\|
  46 .    ds PI \(*p
  47 .    ds L" ``
  48 .    ds R" ''
  49 'br\}
  50 .\"
  51 .\" If the F register is turned on, we'll generate index entries on stderr for
  52 .\" titles (.TH), headers (.SH), subsections (.Sh), items (.Ip), and index
  53 .\" entries marked with X<> in POD.  Of course, you'll have to process the
  54 .\" output yourself in some meaningful fashion.
  55 .if \nF \{\
  56 .    de IX
  57 .    tm Index:\\$1\t\\n%\t"\\$2"
  58 ..
  59 .    nr % 0
  60 .    rr F
  61 .\}
  62 .\"
  63 .\" For nroff, turn off justification.  Always turn off hyphenation; it makes
  64 .\" way too many mistakes in technical documents.
  65 .hy 0
  66 .if n .na
  67 .\"
  68 .\" Accent mark definitions (@(#)ms.acc 1.5 88/02/08 SMI; from UCB 4.2).
  69 .\" Fear.  Run.  Save yourself.  No user-serviceable parts.
  70 .    \" fudge factors for nroff and troff
  71 .if n \{\
  72 .    ds #H 0
  73 .    ds #V .8m
  74 .    ds #F .3m
  75 .    ds #[ \f1
  76 .    ds #] \fP
  77 .\}
  78 .if t \{\
  79 .    ds #H ((1u-(\\\\n(.fu%2u))*.13m)
  80 .    ds #V .6m
  81 .    ds #F 0
  82 .    ds #[ \&
  83 .    ds #] \&
  84 .\}
  85 .    \" simple accents for nroff and troff
  86 .if n \{\
  87 .    ds ' \&
  88 .    ds ` \&
  89 .    ds ^ \&
  90 .    ds , \&
  91 .    ds ~ ~
  92 .    ds /
  93 .\}
  94 .if t \{\
  95 .    ds ' \\k:\h'-(\\n(.wu*8/10-\*(#H)'\'\h"|\\n:u"
  96 .    ds ` \\k:\h'-(\\n(.wu*8/10-\*(#H)'\`\h'|\\n:u'
  97 .    ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'^\h'|\\n:u'
  98 .    ds , \\k:\h'-(\\n(.wu*8/10)',\h'|\\n:u'
  99 .    ds ~ \\k:\h'-(\\n(.wu-\*(#H-.1m)'~\h'|\\n:u'
 100 .    ds / \\k:\h'-(\\n(.wu*8/10-\*(#H)'\z\(sl\h'|\\n:u'
 101 .\}
 102 .    \" troff and (daisy-wheel) nroff accents
 103 .ds : \\k:\h'-(\\n(.wu*8/10-\*(#H+.1m+\*(#F)'\v'-\*(#V'\z.\h'.2m+\*(#F'.\h'|\\n:u'\v'\*(#V'
 104 .ds 8 \h'\*(#H'\(*b\h'-\*(#H'
 105 .ds o \\k:\h'-(\\n(.wu+\w'\(de'u-\*(#H)/2u'\v'-.3n'\*(#[\z\(de\v'.3n'\h'|\\n:u'\*(#]
 106 .ds d- \h'\*(#H'\(pd\h'-\w'~'u'\v'-.25m'\f2\(hy\fP\v'.25m'\h'-\*(#H'
 107 .ds D- D\\k:\h'-\w'D'u'\v'-.11m'\z\(hy\v'.11m'\h'|\\n:u'
 108 .ds th \*(#[\v'.3m'\s+1I\s-1\v'-.3m'\h'-(\w'I'u*2/3)'\s-1o\s+1\*(#]
 109 .ds Th \*(#[\s+2I\s-2\h'-\w'I'u*3/5'\v'-.3m'o\v'.3m'\*(#]
 110 .ds ae a\h'-(\w'a'u*4/10)'e
 111 .ds Ae A\h'-(\w'A'u*4/10)'E
 112 .    \" corrections for vroff
 113 .if v .ds ~ \\k:\h'-(\\n(.wu*9/10-\*(#H)'\s-2\u~\d\s+2\h'|\\n:u'
 114 .if v .ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'\v'-.4m'^\v'.4m'\h'|\\n:u'
 115 .    \" for low resolution devices (crt and lpr)
 116 .if \n(.H>23 .if \n(.V>19 \
 117 \{\
 118 .    ds : e
 119 .    ds 8 ss
 120 .    ds o a
 121 .    ds d- d\h'-1'\(ga
 122 .    ds D- D\h'-1'\(hy
 123 .    ds th \o'bp'
 124 .    ds Th \o'LP'
 125 .    ds ae ae
 126 .    ds Ae AE
 127 .\}
 128 .rm #[ #] #H #V #F C
 129 .\" ========================================================================
 130 .\"
 131 .IX Title "Recursive 3"
 132 .TH Recursive 3 "2008-11-20" "perl v5.8.7" "User Contributed Perl Documentation"
 133 .SH "NAME"
 134 File::Copy::Recursive \- Perl extension for recursively copying files and directories
 135 .SH "SYNOPSIS"
 136 .IX Header "SYNOPSIS"
 137 .Vb 1
 138 \&  use File::Copy::Recursive qw(fcopy rcopy dircopy fmove rmove dirmove);
 139 .Ve
 140 .PP
 141 .Vb 3
 142 \&  fcopy($orig,$new[,$buf]) or die $!;
 143 \&  rcopy($orig,$new[,$buf]) or die $!;
 144 \&  dircopy($orig,$new[,$buf]) or die $!;
 145 .Ve
 146 .PP
 147 .Vb 3
 148 \&  fmove($orig,$new[,$buf]) or die $!;
 149 \&  rmove($orig,$new[,$buf]) or die $!;
 150 \&  dirmove($orig,$new[,$buf]) or die $!;
 151 .Ve
 152 .PP
 153 .Vb 2
 154 \&  rcopy_glob("orig/stuff\-*", $trg [, $buf]) or die $!;
 155 \&  rmove_glob("orig/stuff\-*", $trg [,$buf]) or die $!;
 156 .Ve
 157 .SH "DESCRIPTION"
 158 .IX Header "DESCRIPTION"
 159 This module copies and moves directories recursively (or single files, well... singley) to an optional depth and attempts to preserve each file or directory's mode.
 160 .SH "EXPORT"
 161 .IX Header "EXPORT"
 162 None by default. But you can export all the functions as in the example above and the path* functions if you wish.
 163 .Sh "\fIfcopy()\fP"
 164 .IX Subsection "fcopy()"
 165 This function uses File::Copy's \fIcopy()\fR function to copy a file but not a directory. Any directories are recursively created if need be.
 166 One difference to \fIFile::Copy::copy()\fR is that fcopy attempts to preserve the mode (see Preserving Mode below)
 167 The optional \f(CW$buf\fR in the synopsis if the same as \fIFile::Copy::copy()\fR's 3rd argument
 168 returns the same as \fIFile::Copy::copy()\fR in scalar context and 1,0,0 in list context to accomidate \fIrcopy()\fR's list context on regular files. (See below for more info)
 169 .Sh "\fIdircopy()\fP"
 170 .IX Subsection "dircopy()"
 171 This function recursively traverses the \f(CW$orig\fR directory's structure and recursively copies it to the \f(CW$new\fR directory.
 172 \&\f(CW$new\fR is created if necessary (multiple non existant directories is ok (\s-1IE\s0 foo/bar/baz). The script logically and portably creates all of them if necessary).
 173 It attempts to preserve the mode (see Preserving Mode below) and
 174 by default it copies all the way down into the directory, (see Managing Depth) below.
 175 If a directory is not specified it croaks just like fcopy croaks if its not a file that is specified.
 176 .PP
 177 returns true or false, for true in scalar context it returns the number of files and directories copied,
 178 In list context it returns the number of files and directories, number of directories only, depth level traversed.
 179 .PP
 180 .Vb 2
 181 \&  my $num_of_files_and_dirs = dircopy($orig,$new);
 182 \&  my($num_of_files_and_dirs,$num_of_dirs,$depth_traversed) = dircopy($orig,$new);
 183 .Ve
 184 .PP
 185 Normally it stops and return's if a copy fails, to continue on regardless set \f(CW$File::Copy::Recursive::SkipFlop\fR to true.
 186 .PP
 187 .Vb 1
 188 \&    local $File::Copy::Recursive::SkipFlop = 1;
 189 .Ve
 190 .PP
 191 That way it will copy everythgingit can ina directory and won't stop because of permissions, etc...
 192 .Sh "\fIrcopy()\fP"
 193 .IX Subsection "rcopy()"
 194 This function will allow you to specify a file *or* directory. It calls \fIfcopy()\fR if its a file and \fIdircopy()\fR if its a directory.
 195 If you call \fIrcopy()\fR (or \fIfcopy()\fR for that matter) on a file in list context, the values will be 1,0,0 since no directories and no depth are used.
 196 This is important becasue if its a directory in list context and there is only the initial directory the return value is 1,1,1.
 197 .Sh "\fIrcopy_glob()\fP"
 198 .IX Subsection "rcopy_glob()"
 199 This function lets you specify a pattern suitable for perl's \fIglob()\fR as the first argument. Subsequently each path returned by perl's \fIglob()\fR gets \fIrcopy()\fRied.
 200 .PP
 201 It returns and array whose items are array refs that contain the return value of each \fIrcopy()\fR call.
 202 .PP
 203 It forces behavior as if \f(CW$File::Copy::Recursive::CPRFComp\fR is true.
 204 .Sh "\fIfmove()\fP"
 205 .IX Subsection "fmove()"
 206 Copies the file then removes the original. You can manage the path the original file is in according to \f(CW$RemvBase\fR.
 207 .Sh "\fIdirmove()\fP"
 208 .IX Subsection "dirmove()"
 209 Uses \fIdircopy()\fR to copy the directory then removes the original. You can manage the path the original directory is in according to \f(CW$RemvBase\fR.
 210 .Sh "\fIrmove()\fP"
 211 .IX Subsection "rmove()"
 212 Like \fIrcopy()\fR but calls \fIfmove()\fR or \fIdirmove()\fR instead.
 213 .Sh "\fIrmove_glob()\fP"
 214 .IX Subsection "rmove_glob()"
 215 Like \fIrcopy_glob()\fR but calls \fIrmove()\fR instead of \fIrcopy()\fR
 216 .PP
 217 \fI$RemvBase\fR
 218 .IX Subsection "$RemvBase"
 219 .PP
 220 Default is false. When set to true the *\fImove()\fR functions will not only attempt to remove the original file or directory but will remove the given path it is in.
 221 .PP
 222 So if you:
 223 .PP
 224 .Vb 2
 225 \&   rmove('foo/bar/baz', '/etc/');
 226 \&   # "baz" is removed from foo/bar after it is successfully copied to /etc/
 227 .Ve
 228 .PP
 229 .Vb 5
 230 \&   local $File::Copy::Recursive::Remvbase = 1;
 231 \&   rmove('foo/bar/baz','/etc/');
 232 \&   # if baz is successfully copied to /etc/ :
 233 \&   # first "baz" is removed from foo/bar
 234 \&   # then "foo/bar is removed via pathrm()
 235 .Ve
 236 .PP
 237 $ForcePth
 238 .IX Subsection "$ForcePth"
 239 .PP
 240 Default is false. When set to true it calls \fIpathempty()\fR before any directories are removed to empty the directory so it can be \fIrmdir()\fR'ed when \f(CW$RemvBase\fR is in effect.
 241 .Sh "Creating and Removing Paths"
 242 .IX Subsection "Creating and Removing Paths"
 243 \fI$NoFtlPth\fR
 244 .IX Subsection "$NoFtlPth"
 245 .PP
 246 Default is false. If set to true  \fIrmdir()\fR, \fImkdir()\fR, and \fIpathempty()\fR calls in \fIpathrm()\fR and \fIpathmk()\fR do not \fIreturn()\fR on failure.
 247 .PP
 248 If its set to true they just silently go about their business regardless. This isn't a good idea but its there if you want it.
 249 .PP
 250 \fI$DirPerms\fR
 251 .IX Subsection "$DirPerms"
 252 .PP
 253 Mode to pass to any \fImkdir()\fR calls. Defaults to 0777 as per \fIumask()\fR's \s-1POD\s0. Explicitly having this allows older perls to be able to use \s-1FCR\s0 and might add a bit of flexibility for you.
 254 .PP
 255 Any value you set it to should be suitable for \fIoct()\fR
 256 .PP
 257 \fIPath functions\fR
 258 .IX Subsection "Path functions"
 259 .PP
 260 These functions exist soley because they were necessary for the move and copy functions to have the features they do and not because they are of themselves the purpose of this module. That being said, here is how they work so you can understand how the copy and move funtions work and use them by themselves if you wish.
 261 .PP
 262 \fIpathrm()\fR
 263 .IX Subsection "pathrm()"
 264 .PP
 265 Removes a given path recursively. It removes the *entire* path so be carefull!!!
 266 .PP
 267 Returns 2 if the given path is not a directory.
 268 .PP
 269 .Vb 2
 270 \&  File::Copy::Recursive::pathrm('foo/bar/baz') or die $!;
 271 \&  # foo no longer exists
 272 .Ve
 273 .PP
 274 Same as:
 275 .PP
 276 .Vb 3
 277 \&  rmdir 'foo/bar/baz' or die $!;
 278 \&  rmdir 'foo/bar' or die $!;
 279 \&  rmdir 'foo' or die $!;
 280 .Ve
 281 .PP
 282 An optional second argument makes it call \fIpathempty()\fR before any \fIrmdir()\fR's when set to true.
 283 .PP
 284 .Vb 2
 285 \&  File::Copy::Recursive::pathrm('foo/bar/baz', 1) or die $!;
 286 \&  # foo no longer exists
 287 .Ve
 288 .PP
 289 Same as:PFSCheck
 290 .PP
 291 .Vb 6
 292 \&  File::Copy::Recursive::pathempty('foo/bar/baz') or die $!;
 293 \&  rmdir 'foo/bar/baz' or die $!;
 294 \&  File::Copy::Recursive::pathempty('foo/bar/') or die $!;
 295 \&  rmdir 'foo/bar' or die $!;
 296 \&  File::Copy::Recursive::pathempty('foo/') or die $!;
 297 \&  rmdir 'foo' or die $!;
 298 .Ve
 299 .PP
 300 An optional third argument acts like \f(CW$File::Copy::Recursive::NoFtlPth\fR, again probably not a good idea.
 301 .PP
 302 \fIpathempty()\fR
 303 .IX Subsection "pathempty()"
 304 .PP
 305 Recursively removes the given directory's contents so it is empty. returns 2 if argument is not a directory, 1 on successfully emptying the directory.
 306 .PP
 307 .Vb 2
 308 \&   File::Copy::Recursive::pathempty($pth) or die $!;
 309 \&   # $pth is now an empty directory
 310 .Ve
 311 .PP
 312 \fIpathmk()\fR
 313 .IX Subsection "pathmk()"
 314 .PP
 315 Creates a given path recursively. Creates foo/bar/baz even if foo does not exist.
 316 .PP
 317 .Vb 1
 318 \&   File::Copy::Recursive::pathmk('foo/bar/baz') or die $!;
 319 .Ve
 320 .PP
 321 An optional second argument if true acts just like \f(CW$File::Copy::Recursive::NoFtlPth\fR, which means you'd never get your \fIdie()\fR if something went wrong. Again, probably a *bad* idea.
 322 .PP
 323 \fIpathrmdir()\fR
 324 .IX Subsection "pathrmdir()"
 325 .PP
 326 Same as \fIrmdir()\fR but it calls \fIpathempty()\fR first to recursively empty it first since rmdir can not remove a directory with contents.
 327 Just removes the top directory the path given instead of the entire path like \fIpathrm()\fR. Return 2 if given argument does not exist (\s-1IE\s0 its already gone). Return false if it exists but is not a directory.
 328 .Sh "Preserving Mode"
 329 .IX Subsection "Preserving Mode"
 330 By default a quiet attempt is made to change the new file or directory to the mode of the old one.
 331 To turn this behavior off set
 332   \f(CW$File::Copy::Recursive::KeepMode\fR
 333 to false;
 334 .Sh "Managing Depth"
 335 .IX Subsection "Managing Depth"
 336 You can set the maximum depth a directory structure is recursed by setting:
 337   \f(CW$File::Copy::Recursive::MaxDepth\fR
 338 to a whole number greater than 0.
 339 .Sh "SymLinks"
 340 .IX Subsection "SymLinks"
 341 If your system supports symlinks then symlinks will be copied as symlinks instead of as the target file.
 342 Perl's \fIsymlink()\fR is used instead of File::Copy's \fIcopy()\fR
 343 You can customize this behavior by setting \f(CW$File::Copy::Recursive::CopyLink\fR to a true or false value.
 344 It is already set to true or false dending on your system's support of symlinks so you can check it with an if statement to see how it will behave:
 345 .PP
 346 .Vb 5
 347 \&    if($File::Copy::Recursive::CopyLink) {
 348 \&        print "Symlinks will be preserved\en";
 349 \&    } else {
 350 \&        print "Symlinks will not be preserved because your system does not support it\en";
 351 \&    }
 352 .Ve
 353 .PP
 354 If symlinks are being copied you can set \f(CW$File::Copy::Recursive::BdTrgWrn\fR to true to make it carp when it copies a link whose target does not exist. Its false by default.
 355 .PP
 356 .Vb 1
 357 \&    local $File::Copy::Recursive::BdTrgWrn  = 1;
 358 .Ve
 359 .Sh "Removing existing target file or directory before copying."
 360 .IX Subsection "Removing existing target file or directory before copying."
 361 This can be done by setting \f(CW$File::Copy::Recursive::RMTrgFil\fR or \f(CW$File::Copy::Recursive::RMTrgDir\fR for file or directory behavior respectively.
 362 .PP
 363 0 = off (This is the default)
 364 .PP
 365 1 = \fIcarp()\fR $! if removal fails
 366 .PP
 367 2 = return if removal fails
 368 .PP
 369 .Vb 3
 370 \&    local $File::Copy::Recursive::RMTrgFil = 1;
 371 \&    fcopy($orig, $target) or die $!;
 372 \&    # if it fails it does warn() and keeps going
 373 .Ve
 374 .PP
 375 .Vb 3
 376 \&    local $File::Copy::Recursive::RMTrgDir = 2;
 377 \&    dircopy($orig, $target) or die $!;
 378 \&    # if it fails it does your "or die"
 379 .Ve
 380 .PP
 381 This should be unnecessary most of the time but its there if you need it :)
 382 .Sh "Turning off \fIstat()\fP check"
 383 .IX Subsection "Turning off stat() check"
 384 By default the files or directories are checked to see if they are the same (\s-1IE\s0 linked, or two paths (absolute/relative or different relative paths) to the same file) by comparing the file's \fIstat()\fR info.
 385 It's a very efficient check that croaks if they are and shouldn't be turned off but if you must for some weird reason just set \f(CW$File::Copy::Recursive::PFSCheck\fR to a false value. (\*(L"\s-1PFS\s0\*(R" stands for \*(L"Physical File System\*(R")
 386 .Sh "Emulating cp \-rf dir1/ dir2/"
 387 .IX Subsection "Emulating cp -rf dir1/ dir2/"
 388 By default dircopy($dir1,$dir2) will put \f(CW$dir1\fR's contents right into \f(CW$dir2\fR whether \f(CW$dir2\fR exists or not.
 389 .PP
 390 You can make \fIdircopy()\fR emulate cp \-rf by setting \f(CW$File::Copy::Recursive::CPRFComp\fR to true.
 391 .PP
 392 \&\s-1NOTE:\s0 This only emulates \-f in the sense that it does not prompt. It does not remove the target file or directory if it exists.
 393 If you need to do that then use the variables \f(CW$RMTrgFil\fR and \f(CW$RMTrgDir\fR described in \*(L"Removing existing target file or directory before copying\*(R" above.
 394 .PP
 395 That means that if \f(CW$dir2\fR exists it puts the contents into \f(CW$dir2\fR/$dir1 instead of \f(CW$dir2\fR just like cp \-rf.
 396 If \f(CW$dir2\fR does not exist then the contents go into \f(CW$dir2\fR like normal (also like cp \-rf)
 397 .PP
 398 So assuming 'foo/file':
 399 .PP
 400 .Vb 3
 401 \&    dircopy('foo', 'bar') or die $!;
 402 \&    # if bar does not exist the result is bar/file
 403 \&    # if bar does exist the result is bar/file
 404 .Ve
 405 .PP
 406 .Vb 4
 407 \&    $File::Copy::Recursive::CPRFComp = 1;
 408 \&    dircopy('foo', 'bar') or die $!;
 409 \&    # if bar does not exist the result is bar/file
 410 \&    # if bar does exist the result is bar/foo/file
 411 .Ve
 412 .PP
 413 You can also specify a star for cp \-rf glob type behavior:
 414 .PP
 415 .Vb 3
 416 \&    dircopy('foo/*', 'bar') or die $!;
 417 \&    # if bar does not exist the result is bar/file
 418 \&    # if bar does exist the result is bar/file
 419 .Ve
 420 .PP
 421 .Vb 4
 422 \&    $File::Copy::Recursive::CPRFComp = 1;
 423 \&    dircopy('foo/*', 'bar') or die $!;
 424 \&    # if bar does not exist the result is bar/file
 425 \&    # if bar does exist the result is bar/file
 426 .Ve
 427 .PP
 428 \&\s-1NOTE:\s0 The '*' is only like cp \-rf foo/* and *DOES \s-1NOT\s0 \s-1EXPAND\s0 \s-1PARTIAL\s0 \s-1DIRECTORY\s0 \s-1NAMES\s0 \s-1LIKE\s0 \s-1YOUR\s0 \s-1SHELL\s0 DOES* (\s-1IE\s0 not like cp \-rf fo* to copy foo/*)
 429 .Sh "Allowing Copy Loops"
 430 .IX Subsection "Allowing Copy Loops"
 431 If you want to allow:
 432 .PP
 433 .Vb 1
 434 \&  cp \-rf . foo/
 435 .Ve
 436 .PP
 437 type behavior set \f(CW$File::Copy::Recursive::CopyLoop\fR to true.
 438 .PP
 439 This is false by default so that a check is done to see if the source directory will contain the target directory and croaks to avoid this problem.
 440 .PP
 441 If you ever find a situation where \f(CW$CopyLoop\fR = 1 is desirable let me know (\s-1IE\s0 its a bad bad idea but is there if you want it)
 442 .PP
 443 (Note: On Windows this was necessary since it uses \fIstat()\fR to detemine samedness and \fIstat()\fR is essencially useless for this on Windows.
 444 The test is now simply skipped on Windows but I'd rather have an actual reliable check if anyone in Microsoft land would care to share)
 445 .SH "SEE ALSO"
 446 .IX Header "SEE ALSO"
 447 File::Copy File::Spec
 448 .SH "TO DO"
 449 .IX Header "TO DO"
 450 I am currently working on and reviewing some other modules to use in the new interface so we can lose the horrid globals as well as some other undesirable traits and also more easily make available some long standing requests.
 451 .PP
 452 Tests will be easier to do with the new interface and hence the testing focus will shift to the new interface and aim to be comprehensive.
 453 .PP
 454 The old interface will work, it just won't be brought in until it is used, so it will add no overhead for users of the new interface.
 455 .PP
 456 I'll add this after the latest verision has been out for a while with no new features or issues found :)
 457 .SH "AUTHOR"
 458 .IX Header "AUTHOR"
 459 Daniel Muey, <http://drmuey.com/cpan_contact.pl>
 460 .SH "COPYRIGHT AND LICENSE"
 461 .IX Header "COPYRIGHT AND LICENSE"
 462 Copyright 2004 by Daniel Muey
 463 .PP
 464 This library is free software; you can redistribute it and/or modify
 465 it under the same terms as Perl itself.