push (@args, SOAP::Data->name('Command' => $rcc{$command}));
push (@args, SOAP::Data->name('IanaOemNumber' => 343));
if ($command ne 'powerdown') {
push (@args, SOAP::Data->name('Command' => $rcc{$command}));
push (@args, SOAP::Data->name('IanaOemNumber' => 343));
if ($command ne 'powerdown') {
push (@args, SOAP::Data->name('SpecialCommand' => 0xC1 ));
push (@args, SOAP::Data->name('SpecialCommandParameter' => 0));
push (@args, SOAP::Data->name('SpecialCommand' => 0xC1 ));
push (@args, SOAP::Data->name('SpecialCommandParameter' => 0));