I tried this copy commands via command line and worked correct. Via perl script I am getting a problem. Similarly for zip of files, works from command line, via perl script see the problem.
if ($filename_new =~ m/\+/ )
{
$filename_new = $bugfixzip;
my $bugfixzip = $SOURCE_DIR."/"."bugfixfiles.zip";
print "Zipping files with + sign in filename\n";
system("zip ${bugfixzip} ${filename_new}");
print "copy $bugfixzip","$WORK_DIR/$project/$version/$lang/us_source/$bugfixzip\n";
copy ("$bugfixzip","$WORK_DIR/$project/$version/$lang/us_source/bugfixfiles.zip");
system("unzip $WORK_DIR/$project/$version/$lang/us_source/bugfixfiles.zip $WORK_DIR/$project/$version/$lang/us_source/");
}