Shell Programming and Scripting

Hi

Could you please help me on this

I have folder called D:\Data in which we have 20 files coming daily and needed all 20 files to copy into D:\Target ,as i am new to PERL, i did nt know how to use this

I googled sme of the code and done the copy script,it is throwing error like we do install File::NCopy module to perform this

Code:

#!/usr/bin/perl
    use strict;
    use warnings;
    use File::NCopy;

    my $source_dir  = "D://data";
    my $target_dir  = "D://target";

    mkdir($target_dir) or die "Could not mkdir $target_dir: $!";

    my $cp = File::NCopy->new(recursive => 1);
    $cp->copy("$source_dir/*", $target_dir) 
        or die "Could not perform rcopy of $source_dir to $target_dir: $!";
        
    exit 0;

Could you please help me with sme sample script to do this

Thanks a lot

---------- Post updated at 03:53 AM ---------- Previous update was at 01:19 AM ----------

Can you pls provide some sample code to copy..

Sounds like you havent got NCopy installed

Example:-

http://joysofprogramming.com/install...y-perl-ubuntu/