#!/usr/bin/perl -w use strict; use Frontier::Client; use Getopt::Long; use constant WEBLOGCOMXMLRPCSERVER => 'http://rpc.weblogs.com/RPC2'; my $MYBLOGTITLE = ""; my $MYBLOGURL = ""; my $client = ""; my $response = ""; my $output = ""; GetOptions( "title=s" => \$MYBLOGTITLE, "url=s" => \$MYBLOGURL); $client = Frontier::Client->new( url => WEBLOGCOMXMLRPCSERVER, use_objects => 0, debug => 0); $response = $client -> call ('weblogUpdates.ping', $MYBLOGTITLE, $MYBL +OGURL); print "Weblogs.com said: \n\n $response->{'message'}\n\n";
In reply to Weblogs.com xml-rpc update notifier by benhammersley
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |