[MacPerl] copying an alias

[Tom Sackett <tsackett@adobe.com>]

How can I copy a file that is an alias in MacPerl?

I'm using the "find" method to copy an entire directory tree by going
through each directory recursively. When it gets to a directory, it creates
a new directory in the destination tree. When it finds a file, it copies it
to the destination tree. However, my script can't handle aliases.

I've succeeded in detecting if a file is an alias using "-l", but I can't
get the "copy" command to copy it. How is this done?

thanks in advance,
- Tom Sackett
  Seattle, Washington, USA

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