Select Code to Download

use strict;
use warnings;
...
my $client = Net::Trackback::Client->new();
my $msg = $client->send_ping($ping);
print $msg->to_xml;

<?xml version="1.0" encoding="iso-8859-1"?>
<response>
  <error>405</error>
  <message></message>
</response>