X-Git-Url: http://git.rot13.org/?p=perl-cwmp.git;a=blobdiff_plain;f=bin%2Fcpe-queue.pl;fp=bin%2Fcpe-queue.pl;h=6b6a008e22b331fea083af3701b006dbe004b4a4;hp=b3784059f905554dcb919f566cf39b0660bd9ae5;hb=35e5be71b934e7bd7898d3e86ea42e1592c7cfb8;hpb=344caca0b017590a9a3770a634841892a2c82cb2 diff --git a/bin/cpe-queue.pl b/bin/cpe-queue.pl index b378405..6b6a008 100755 --- a/bin/cpe-queue.pl +++ b/bin/cpe-queue.pl @@ -135,6 +135,12 @@ foreach my $id ( @ARGV ) { $q->enqueue( 'GetParameterValues', [ 'InternetGatewayDevice.', ]); + + $q->enqueue( 'GetParameterAttributes', [ + 'InternetGatewayDevice.DeviceInfo.SerialNumber', + ]); + +# $q->enqueue( 'SetParameterAttributes', [ ' } }