mt - Adds support for the MovableType XML-RPC API
use Net::Blogger; use Carp; use Data::Dumper; my $mt = Net::Blogger->new(engine=>"movabletype"); $mt->Proxy("http://yaddayadda.com/mt-xmlrpc.cgi"); $mt->Username("asc"); $mt->Password("*****"); $mt->BlogId(123); $mt->newPost(postbody=>\&fortune(),publish=>1) || croak $mt->LastError(); my $id = $mt->metaWeblog()->newPost(title=>"test:".time, description=>&fortune(), publish=>1) || croak $mt->LastError(); my $categories = $mt->mt()->getCategoryList() || croak $mt->LastError(); my $cid = $categories->[0]->{categoryId}; $mt->mt()->setPostCategories(postid=>$id, categories=>[{categoryId=>$cid}]) || croak $mt->LastError(); print &Dumper($mt->mt()->getPostCategories(postid=>$id)); sub fortune { local $/; undef $/; system ("fortune > /home/asc/tmp/fortune"); open F, "</home/asc/tmp/fortune"; my $fortune = <F>; close F; return $fortune; }
Adds support for the MovableType XML-RPC API
Valid arguments are :
count
Int.
The number of post titles to fetch. Default is 20
asc
Boolean.
As in: return data ordered by ascending date. By default, items are returned 'most recent first'.
Returns an array ref of hash refs. Each hash ref contains the following keys :
postid
userid
title
String.
dateCreated
String, formatted as a W3CDTF datetime.
This method was introduced in Net::Blogger 0.86 and does not accept arguments passed as a list. They must be passed by reference.
Returns an array ref of hash references.
Valid arguments are
String. required
Releases prior to Net::Blogger 0.85 accepted a list of arguments rather than a reference. Version 0.85+ are backwards compatible.
Returns an array ref of hash references
Valid argument are
String. Required
categories
Array ref. required
The MT docs state that :
The array categories is an array of structs containing
categoryId
isPrimary
Using isPrimary to set the primary category is optional--in the absence of this flag, the first struct in the array will be assigned the primary category for the post
Returns true or false
*
Returns an array reference of hash references who keys are :
pingTitle
pingURL
pingIP
Returns an array reference.
Returns true or false.
0.3
$Date: 2003/07/14 14:00:07 $
Aaron Straup Cope
Net::Blogger::Engine::Base
http://www.movabletype.org/mt-static/docs/mtmanual_programmatic.html#xmlrpc%20api
Copyright (c) 2002-2003, Aaron Straup Cope. All Rights Reserved.
This is free software, you may use it and distribute it under the same terms as Perl itself.
To install Net::Blogger, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Net::Blogger
CPAN shell
perl -MCPAN -e shell install Net::Blogger
For more information on module installation, please visit the detailed CPAN module installation guide.