Hello, I am fairly new to using Perl and am having trouble with getting net use to operate correctly. The program will run, but nothing will happen on the target machine.

All of the net use commands and psexec commands work when run in a batch file, so i figure that i have them formatted in-correctly for use in Perl.

#!Perl

use 5.010;


# Defines variables
$ipInput = 0;
$userName = 0;
$passWord = 0;
$ip = 0;


# Defines the IP array
@ip = ();

# User input
say "Please enter the username:";
$userName = <STDIN>;

say "";

say "Please enter the password:";
$passWord = <STDIN>;

say "";

say "Please enter the ip addresses of the machines you would like to i
+nstall VNC on";
say "";
say "Ex: xxx.xxx.xxx.xxx, xxx.xxx.xxx.xxx etc...";
$ipInput = <STDIN>;

# Sets delimeter for array input
@ip = split(',',$ipInput);

# A loop that will perform the operation on each machine, from wich an
+ ip was given
foreach $ip(@ip)
{

# Initiate the connection
'net use \\\\$ip\\IPC$ /user:$userName $passWord';

# Copies the program files
'xcopy "C:\\Program Files\\UltraVNC\\*.*" "\\\\$ip\\C$\\Program Files\
+\UltraVNC\\*.*" /r/i/c/h/k/e/Y';

# Dumps the registry
'regedit /e "\\\\$ip\\C$\\vncdmp.txt" "HKEY_LOCAL_MACHINE\\Software\\O
+RL"';

# Puts registry entries on remote machine
'psexec \\\\$ip -s -i -d %windir%\\regedit /s C:\\vncdmp.txt';

# Installs the program as a service
'psexec \\\\$ip -s -i -d "C:\\Program Files\\UltraVNC\\winvnc.exe" -in
+stall';

# Starts the VNC server
'psexec \\\\$ip -s -i -d net start "VNC Server"';

}
[download]

Additionally, I do not know if it matters but I am using Active Perl.
Thank you for your time.