-my $queue;
-
-if ( $protocol_dump ) {
-
- warn "generating dump of xml protocol with CPE\n";
-
- $queue = [
- 'GetRPCMethods',
- 'GetParameterNames',
-# [ 'GetParameterNames', 'InternetGatewayDevice.DeviceInfo.SerialNumber', 0 ],
-# [ 'GetParameterNames', 'InternetGatewayDevice.DeviceInfo.', 1 ],
- [ 'GetParameterValues',
- 'InternetGatewayDevice.DeviceInfo.SerialNumber',
- 'InternetGatewayDevice.DeviceInfo.VendorConfigFile.',
- 'InternetGatewayDevice.DeviceInfo.X_000E50_Country',
- ],
- [ 'SetParameterValues',
- 'InternetGatewayDevice.DeviceInfo.ProvisioningCode' => 'test provision',
-# 'InternetGatewayDevice.DeviceInfo.X_000E50_Country' => 1,
- ],
-# 'Reboot',
- ];
-};
-