Why cant perl resolve this address?

[Ryan Guy]

I am trying to copy files into users start menus because of an installation
gone awry.  The files goto different places depending on the os.  

networked computers are referred to as:
\\(computername)\(driveletter)$

john doe's machine name:
\\doej\c$    (for the c drive)
\\doej\d$    (for the d drive)




<snip>
open(FILE,"c:\\data.txt");
@compNames=<FILE>;
close(FILE);
foreach $comp (@compNames){
    print "\n";
    if($comp~=/nt/){
        print "$comp is an NT system ... attempting to copy ... ";
        system("copy \"C:\\Documents and Settings\\ryang\\Start
Menu\\Programs\\Yardi 4.3\\*.*\" \"\\\\$comp\\c\$\\winnt\\profiles\\all
users\\start menu\\programs\\Yardi 4.3\\\"") || print "Failed!" && next;
        print "Success ...";
    }
    elsif($comp~=/2k/){
        print "$comp is a 2000 system ... attempting to copy ... ";
        system("copy \"C:\\Documents and Settings\\ryang\\Start
Menu\\Programs\\Yardi 4.3\\*.*\" \"\\\\$comp\\c\$\\Documents and
Settings\\ryang\\Start Menu\\Programs\\Yardi 4.3\\\"") || print "Failed!" &&
next;
        print "Success ..."
    }
}
<\snip>

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]