tweaks
git-svn-id: https://perl-cwmp.googlecode.com/svn/trunk@211
836a5e1a-633d-0410-964b-
294494ad4392
warn "generating dump of xml protocol with CPE\n";
$q->enqueue( 'GetRPCMethods' );
warn "generating dump of xml protocol with CPE\n";
$q->enqueue( 'GetRPCMethods' );
- $q->enqueue( 'GetParameterNames' );
$q->enqueue( 'GetParameterNames', [ 'InternetGatewayDevice.DeviceInfo.SerialNumber', 0 ] );
$q->enqueue( 'GetParameterNames', [ 'InternetGatewayDevice.DeviceInfo.', 1 ] );
$q->enqueue( 'GetParameterNames', [ 'InternetGatewayDevice.DeviceInfo.SerialNumber', 0 ] );
$q->enqueue( 'GetParameterNames', [ 'InternetGatewayDevice.DeviceInfo.', 1 ] );
# 'InternetGatewayDevice.DeviceInfo.X_000E50_Country' => 1,
});
# 'InternetGatewayDevice.DeviceInfo.X_000E50_Country' => 1,
});
-# $q->enqueue( 'Reboot' );
+ $q->enqueue( 'Reboot' );
# 'InternetGatewayDevice.',
# ]);
# 'InternetGatewayDevice.',
# ]);
- $q->enqueue( 'GetParameterNames', [ '.ExternalIPAddress', 1 ] );
- $q->enqueue( 'SetParameterValues', { '.ExternalIPAddress' => '192.168.1.250' });
- $q->enqueue( 'GetParameterNames', [ '.ExternalIPAddress', 1 ] );
+# $q->enqueue( 'GetParameterNames', [ '.ExternalIPAddress', 1 ] );
+ $q->enqueue( 'GetParameterNames', [ 'InternetGatewayDevice.', 1 ] );