in reply to Win32::LanMan

Never mind...
Win32::Lanman::EnumServicesStatus("\\\\$host","",&Win32::Lanman::SERVI +CE_WIN32,&Win32::Lanman::SERVICE_STATE_ALL,\@services)