Hi,
I want to use the following pm's to copy files.
(CODE SNIPPIT)
use File::Copy;
use File::Find;
use File::Path;
my $MYPATH = $ENV {'WORKBENCH_HOME'};
my $MYPATH2 = $ENV {'ESEC_HOME'};
#MAIN
$newAgentName = &promptUser("Enter the New Agent Name which you want to
upgrade to 5.0 ");
$mainParParameter = &promptUser("Enter the Parameter Name used in
main.par ( Second Section )");
$targetDirectory = &promptUser("Enter the target directory ",
"$perl_path\\$newAgentName");
Now I want to use cp command from File::Copy to copy fileA to
$targetDirectory
I would appreciate any help.
Thanks,
-Kamal.
_______________________________________________
ActivePerl mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
