cp -al
[download]

cp - al
[download]

Though the usual suggestion for a Perl replacement of /bin/cp, would be to use to File::Copy, this doesn't apply in your case, since you want to create hard links. Is there a particular reason why you don't just shell out, i.e. system('cp -al DIRX DIRY')?

Dear Ronald
using system or exec is the default option. However if any Perl module can link and Archive the file while copying, then I will prefer it. It seems that I have to use the default option in this case. Thanks to you for your help.

?? ?node_id=3989;BIT=link;HIT=cp;CU;CC;Cr;Sn -> ?maybe? mvi -- mv+vi (+ln+rm+cp+mkdir)

?? ?node_id=3989;HIT=link;CU;CC;Cr;Sn -> ?no? Remove broken symlinks with IO::All

?no? cp/cp - copy files and/or directories

Oh well, File::Find::Rule, Path::Class::Rule, File::Path, symlink, link tree ...

?kinda not? mise - manage directory and symlink creation, globally and per-project

?bingo? symlink.pl - create a symlink shadow of the Parrot source.

Where is the -l option?

-l : create a link instead to copy files

the perl function here should be probably "link" instead copy (or "symlink" if you want instead a soft link). I had not verified that works with directories, so try first with something that you can lose.

link DIRX DIRY