use strict; use Win32::NetResource qw(:DEFAULT GetSharedResources GetError); if (GetSharedResources(my $resources, RESOURCETYPE_ANY, { RemoteName => "\\\\" . Win32::NodeName() })) { foreach my $href (@$resources) { print "-----\n"; foreach(keys %$href) { print "$_: $href->{$_}\n"; } } }
In reply to Re: Re: Re: Win32:NetResource problem
by waswas-fng
in thread Win32:NetResource problem
by arkamedis21
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |