I want to copy few files from a source directory to a destination directory

my array contains all the source file names like this

"..\..\..\AlgSource\ISA\C64x\asm\idct_8x8_c64xplus_h.asm"
 "..\..\..\AlgSource\ISA\C64x\asm\jpegdec_ti_vld_n_mcu.asm"
 "..\..\..\AlgSource\ISA\C64x\C\byte_unstuff.c"
 "..\..\..\AlgSource\ISA\C64x\C\dc_pred_comp.c"


Now, I want to copy all these files into a new dir   D:\newsrc\


I tried like this,


Use File::Copy

$newpath="D:\\newsrc\\";

foreach $source (@src)
{
print "COpying $source to $newpath \n";
copy ("$source","$newpath");

 }



It is not copying the files, though there is no error printed on screen. :(



Can you please help.?





thanks

satya

Reply via email to