Re: [MacPerl] How to copy whole folders?

[Chris Nandor <pudge@pobox.com>]

At 08.13 -0500 1999.03.04, Martin Wilhelm Leidig wrote:
>use File::Copy;
>...
>copy ($InDirName, $OutDirName) or warn ($!);

A directory or folder is not a file.  :)

# >and got some odd looking error about "Operation not allowed for
# sockets" or something like that, no matter if the folder was empty or
# not.  Using "rename" instead of "copy" in the fragment above works
# without any flaw.  Is there a simple (and portable) way to duplicate
# whole folders to some other place?  Have I to run the subtree and to
# copy each single file myself?

The Mac::MoreFiles module has an FSpDirectoryCopy() function.

  #!perl -w
  use Mac::MoreFiles;
  FSpDirectoryCopy(
    'Bourque:Desktop Folder:untitled folder:',
    'Bourque:', 0) or die $^E;

Not portable to other platforms, of course.

--
Chris Nandor          mailto:pudge@pobox.com         http://pudge.net/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10  1FF77F13 8180B6B6'])

===== Want to unsubscribe from this list?
===== Send mail with body "unsubscribe" to macperl-request@macperl.org