my $remote_system_ip = "10.10.2.2";
my $user_name = "Administrator";
my $password = "d*diablo123";
my $source_dir = "C:\\shyam\\dir1";
my $target_file1 = "\\\\$remote_system_ip\\c\$\\shyam_IC\\shyam.txt";
my $target_file2 = "\\\\$remote_system_ip\\c\$\\shyam_IC\\shyam1.txt";
my $target_file3 = "\\\\$remote_system_ip\\c\$\\shyam_IC\\Logs2011-09-19_2321.zip";
my $target_file4 = "\\\\$remote_system_ip\\c\$\\shyam_IC\\Logs2011-09-19_215.zip";


`net use \\\\$remote_system_ip\\c\$ $password \/user:$user_name`;

`copy \/Y $target_file1 $source_dir`;
print("1");
`copy \/Y $target_file2 $source_dir`;
print("2");
`copy \/Y $target_file3 $source_dir`;
print("3");
`copy \/Y $target_file4 $source_dir`;
print("4");

`net use \\\\$remote_system_ip\\c\$ \/delete`;