Hi,
Use File::Copy::Recursive:
NAME
File::Copy::Recursive - Perl extension for recursively copying files and
directories
SYNOPSIS
use File::Copy::Recursive qw(fcopy rcopy dircopy fmove rmove dirmove);
fcopy($orig,$new[,$buf]) or die $!;
rcopy($orig,$new[,$buf]) or die $!;
On 3/5/09 Thu Mar 5, 2009 1:48 AM, "Rock Lifestyle"
scribbled:
> Hi ,
>
> My directory structure is like
>
[snipped]
>
> I want to copy some subdirectory and files under it to another directory it
> should exactly create similar directory structure
Use the File::Find and File::Cop
On Thu, Mar 5, 2009 at 6:06 PM, Swayam wrote:
> Hi ,
>
> My directory structure is like
>
> ls -R temp
> temp:
> 2.1 2.2 cleanup setup
>
> temp/2.1:
> 2.1.1cleanup setup
>
> temp/2.1/2.1.1:
> setup cleanup 2.1.1.01 2.1.1.02 2.1.1.03 2.1.1.04 2.1.1.05 2.1.1.06
> 2.1.1.0