#!/usr/bin/perl

use strict;
use warnings;
use SOAP::Lite;

my $oCM = SOAP::Lite->service($url);
$oCM = SOAP::Data->encodingStyle(''),
my $oResult = $oCM->updateLine(
    SOAP::Data->name(destination => $url)
);