MovableTypdeでAtopAPIを利用して投稿する

というわけでやってみたら出来たよ。

#!/usr/local/bin/perl
use CGI::Carp qw(fatalsToBrowser);
use Data::Dumper;
use lib qw(../../extlib);
use DateTime;
use XML::Atom::Entry;
use XML::Atom::Client;

print "Content-type: text/html\n\n";

my $username = 'Melody';
my $password = 'Nelson';

my $PostURI ='http://localhost/cgi-bin/mt/mt-atom.cgi/weblog/blog_id=1/';
my $api = new XML::Atom::Client;
$api->username($username);
$api->password($password);

my $entry = new XML::Atom::Entry;
$entry->title('Sample for AtomAPI');
$entry->content('d-1977');
$entry->summary('概要');
my $EditURI = $api->createEntry($PostURI, $entry);

if ($EditURI) {
    print $EditURI;
} else {
    print $api->errstr;
}

カテゴリーの設定とか、追記の部分だとかがわからない...。
編集すればいいのかな？