NAME
Net::Trackback::Client - a class for implementing Trackback client functionality.
SYNOPSIS
use Net::Trackback::Client;
my $client = Net::Trackback::Client->new();
my $url ='http://www.foo.org/foo.html';
my $data = $client->discover($url);
if (Net::Trackback->is_message($data)) {
print $data->to_xml;
} else {
require Net::Trackback::Ping;
my $p = {
ping_url=>'http://www.foo.org/cgi/mt-tb.cgi/40',
url=>'http://www.timaoutloud.org/archives/000206.html',
title=>'The Next Generation of TrackBack: A Proposal',
description=>'I thought it would be helpful to draft some
suggestions for consideration for the next generation (NG)
of the interface.'
};
my $ping = Net::Trackback::Ping->new($p);
my $msg = $client->send_ping($ping);
print $msg->to_xml;
METHODS
- Net::Trackback::Client->new
-
Constructor method. Returns a Trackback client instance.
- $client->discover($url)
-
A method that fetches the resource and searches for Trackback ping data. If the given resource can not be retreived, a Net::Trackback::Message object is returned with the HTTP error code and message. (A liberty this module takes from the Trackback specification.) Returns a reference to an array of Net::Trackback::Data objects. If the resource is retreived and nothing was found returns
undef
. - $client->send_ping($ping)
-
Executes a ping according to the Net::Trackback::Ping object passed in and returns a Net::Trackback::Message object with the results,
- $client->timeout([$seconds])
-
An accessor to the LWP agent timeout in seconds. Default is 15 seconds. If an optional parameter is passed in the value is set.
AUTHOR & COPYRIGHT
Please see the Net::Trackback manpage for author, copyright, and license information.
4 POD Errors
The following errors were encountered while parsing the POD:
- Around line 80:
=begin without a target?
- Around line 111:
'=item' outside of any '=over'
- Around line 136:
You forgot a '=back' before '=head1'
- Around line 143:
'=end' without a target?