Select Code to Download

use strict ;
use warnings ;

my $xml = XML::Twig->new()->parsefile('example.xml') ;
$xml-> ... ;
$xml -> get_xpath('//ipaddress',0) -> set_text("<IP HERE>") ;

my $uri="https://hostname:9060/ers/config/networkdevice/<ID HERE>";
my $req = HTTP::Request->new( ...
$req->content($xml->sprint) ; # Strange, why is there another $xml->sp
+rint here?
$req->...

my $res = $ua->request( $req ) ;
# Check the outcome of the response
...
} else {
   print $res->status_line, "\n";
}