in reply to Sharedrive and Perl

If you are using a shared drive under a Windows OS, you may want to try and use the drive letter in your $drvname variable.
$drvname="//shareddrive/directory/";
Might work if you write it like this:
$drvname="Z:/shareddrive/directory/";
I agree with the others on the other items.
curtisb