Win32::OLE Map Network Drive Error

sush has asked for the wisdom of the Perl Monks concerning the following question:

Hi Monks,
I am getting a file descriptor error when I am trying to map a network drive on Windows.
The network drive actually turns out to be mapped when I access it from Windows explorer, but I cannot access it through perl (to zip some files on the remote drive) .
The code and error message are displayed below.

Thanks for your help,
my $netObj = Win32::OLE->new('WScript.Network');

print join ("\n","\$source_drive => $source_drive ", "\$mapPath => $mapPath \n");

$netObj->MapNetworkDrive($source_drive,$mapPath,$boolPersistent,$user,$pass);
if ($!){
print " There was some error on mapping : $! \n";
}

--OUTPUT------

$source_drive => R:
$mapPath => \\11.16.152.96\G$
There was some error on mapping : Bad file descriptor
--update: I tried printing out $^E but it was empty, no OS specific error msg , but thanks for the tip BrowserUk.

Comment on Win32::OLE Map Network Drive Error

Replies are listed 'Best First'.
Re: Win32::OLE Map Network Drive Error by BrowserUk (Patriarch) on Oct 30, 2007 at 05:51 UTC
The "Bad descriptor" error is likely a red herring. Try printing `$^E` instead of `$!` in your error message, it will probably give you a better idea of what is failing. Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error. "Science is about questioning the status quo. Questioning authority". In the absence of evidence, opinion is indistinguishable from prejudice. "Too many [] have been sedated by an oppressive environment of political correctness and risk aversion."	[reply] [d/l] [select]
Re: Win32::OLE Map Network Drive Error by Gangabass (Vicar) on Oct 30, 2007 at 09:41 UTC
How about `system('net use R: \\\\11.16.152.96\\G$');` [download] ? Note: not tested!	[reply] [d/l]
Re^2: Win32::OLE Map Network Drive Error by Anonymous Monk on Oct 30, 2007 at 17:40 UTC
Sorry about that guys, I learnt something today, $! may be set somewhere else between Step 1 and Step 3 and if you check it only after step 3 , you break your head thinking its set in Step 3. Sorry for the trouble. Thank you	[reply]