I always use the module Win32::NetResource; in combination with Win32::WinError it is rather easy to use.

Best regards,
perl -e "print a|r,p|d=>b|p=>chr 3**2 .7=>t and t"