r250@brr: dpavlin | 2007-11-20 14:09:59 +0100

[perl-cwmp.git] / bin / cpe-queue.pl

diff --git a/bin/cpe-queue.pl b/bin/cpe-queue.pl
index b378405..6b6a008 100755 (executable)
--- 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', [ '
        }
 
 }