Get remote PC windows shares

[MoshiachNow]

HI,

I use Win32::Lanman for this goal fine on XP,however same perl script finds no remote shares if run on W2K or W2003.

Is there any other method of getting the remote shares ?
Thanks

Code:

if( Win32::Lanman::NetShareEnum( $Machine, \@List ) ) {
foreach my $Share ( @List ) {
my $SHARE = $Share->{netname};
if ($SHARE !~ /.*\$/) {
push(@SHARES,$SHARE) if ($SHARE ne "");
}
}



Long live king Moshiach !

http://www.7for70.com/

 

[MikeLacey]

Hi

Does it return anything at all in @List?

Mike

The options are: fast, cheap and right - pick any two. &

Want great answers to your Tek-Tips questions? Have a look at faq219-2884

 

[MoshiachNow]

Yes,it does.

I have figured out the issue now,Thanks

Long live king Moshiach !

http://www.7for70.com/