Если да, вы можете указать код. Я могу делать почти все остальное от создания новых страниц, изменения атрибутов страницы и т. Д. Но я не могу добавить вложения. Я прочитал официальный conflunce Perl XML-RPC site and discussions, но все фрагменты кода, которые они показывают, не работают для меня. Вот моя взломанная попытка:Кто-нибудь смог получить Confluence.pm для добавления вложений?
# The following command sort of worked:
# ~/bin/wikitool.pl -action attach_file -url $MYURL
# IT attached something but the file was empty
sub attach_file {
my $confluence = XMLRPC::Lite->proxy($opts{server}."rpc/xmlrpc");
my $token = $confluence->call("confluence1.login", $opts{login}, $opts{password})->result();
# Fetch page
my $page = FetchPage($opts{title});
if (not $page) {
dbg("$opts{title} page is missing.","FATAL");
}
my $pageId = SOAP::Data->type(string => $$page{id});
my $filename = "$ENV{HOME}/tmp/tmp0.gif";
my $metadata = {
fileName => $filename,
contentType => "image/gif",
comment => "Some random GIF",
};
if (not open FILE, "< $filename") {
dbg("Could not open file $filename: $!\n","FATAL");
}
binmode FILE;
my $data;
$data .= $_ while (<FILE>);
my $call = $confluence->addAttachment($pageId, $metadata, $data);
my $fault = $call->fault();
if (defined $fault) {
dbg("could not attach $filename" . $call->faultstring(), "FATAL");
}
else {
print "attached $filename\n";
}
}
Спасибо! Я перешел к другим проектам, но спасибо за то, что добавил в сборник некоторое представление ... – stephenmm