Net::Blogger 1.02

Net::Blogger is an OOP-ish interface for accessing a weblog via the Blogger XML-RPC API.

SYNOPSIS

Top
use Net::Blogger;
my $b = Net::Blogger->new(appkey=>APPKEY);

$b->BlogId(BLOGID);
$b->Username(USERNAME);
$b->Password(PASSWORD);

$b->BlogId($b->GetBlogId(blogname=>superfoobar));

# Get recent posts

my ($ok,@p) = $b->getRecentPosts(numposts=>20);

if (! $ok) {
croak $b->LastError();
}

map { print "t $_->{postid}n"; } @p;

# Post from a file

my ($ok,@p) = $b->PostFromFile(file=>"/usr/blogger-test");

if (! $ok) {
croak $b->LastError();
}

# Deleting posts

map {
$b->deletePost(postid=>"$_") || croak $b->LastError();
} @p;

# Getting and setting templates

my $t = $b->getTemplate(type => main);
$b->setTemplate(type=>main,template=>$t) || croak $b->LastError();

# New post

my $txt = "hello world.";
my $id = $b->newPost(postbody=>$txt) || croak $b->LastError();

# Get post

my $post = $b->getPost($id) || croak $b->LastError();
print "Text for last post was $post->{content}n";

Blogger.pm provides an OOP-ish interface for accessing a weblog via the Blogger XML-RPC API.