RSS Pingを複数のURLに送信(XMLRPC::Lite)

ここでは、XMLRPC::Liteモジュールを使ってRSS Pingを複数のPing URLに対して送信する方法を説明したいと思います。

RSS Ping送信サンプル

ブログ名、ブログURL、RSS URL、Ping先などを変更してご利用下さい。 Ping先を増やすには、@ping_urlにPing用URLを追加して下さい。


#!/usr/bin/perl

use XMLRPC::Lite;

#ここを変更して下さい
$title = 'blog title';
$url = 'http://blogurl-hoge.jp/';
$rss = 'http://blogurl-hoge.jp/rss.xml';

#ここを変更して下さい
@ping_url = (
    'http://rpc.reader.livedoor.com/ping',
    'http://www.bloglines.com/ping',
    'http://blogsearch.google.com/ping/RPC2',
    'http://blog.goo.ne.jp/xmlrpc.php',
    'http://rpc.technorati.jp/rpc/ping'
);

foreach $pingdest (@ping_url) {
  $result = XMLRPC::Lite
   ->proxy($pingdest)
   ->call('weblogUpdates.extendedPing',
          $title, $url, $url, $rss);

  print $pingdest;
  print "\n";
  print $result;
  print "\n=====\n";
}

exit;


IPv6基礎検定

YouTubeチャンネルやってます!