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

Hi , I have been trying to enumerate the netbios shares and rpc shares of a remote winXP system. for this i tried,
use strict; use Win32::NetResource qw(:DEFAULT GetSharedResources GetError); if (GetSharedResources(my $resources, RESOURCETYPE_ANY, { RemoteName => "\\\\<remote machine>"})) { foreach my $href (@$resources) { print "-----\n"; foreach(keys %$href) { print "$_: $href->{$_}\n"; } } }
but this enumerates only the network shares but not the netbios shares. please help me to get the netbios shares and ipc shares of the remote system.

Replies are listed 'Best First'.
Re: enumerating netbios shares on remote system
by Anonymous Monk on Mar 07, 2008 at 08:29 UTC