I'm trying to save a page in a wiki using a perl script (see below). Using a similar script to list all pages works fine.
When I run this script I get the exception:
wanted a data type, got ‘nil’
at line 2 column 694
What am I missing?
Here's the perl script I'm using:
#!/usr/bin/perl -w
use strict;
use Frontier::Client;
use Data::Dumper;
my $APPLICATION_NAME = "my-app";
my $API_KEY = "xxxxxxxxxx-my-api-key-xxxxxxxxxx";
my $SERVER_ENDPOINT = "https://$APPLICATION_NAME:$API_KEY\@www.wikidot.com/xml-rpc-api.php";
my $server = Frontier::Client->new(url => $SERVER_ENDPOINT);
create_new_page($server, "mywikisite", "generated-page1");
sub create_new_page {
my ($server, $sitename, $pagename) = @_;
my $content = <<EO1;
This page was created by a remote procedure call. Yeeha!
EO1
my $result = $server->call('pages.save_one', {
"site" => $sitename,
"page" => $pagename,
"title" => "Generated page",
"content" => $content,
"save_mode" => "create"
});
print Dumper $result,
}
Thanks,
Paul