Help for this page
my $subDevices = $wmiService->ExecQuery('ASSOCIATORS OF {Win32_PnPEnti +ty.DeviceID="'.$deviceID.'"} WHERE AssocClass=Win32_PnPDevice');