The wildcat of a wilderness

今更っぽい気もしますが、何とか導入できないかと思いこちらで実験
移転前はrecentwritebacks_treeの方がrecentwblistより重かったので設置できなかったのです
Nest of Snowy Owls：writebackplus の導入方法のコメントでchaliceさんが質問されていたのでそれをヒントに書き換えてみました
recentwritebacks_treeの60行目を

my ($entrytitle, $body, $url, $name, $date, @dates) = ('', '', '', '', '', ());

を

my ($entrytitle, $body, $name, $url, $date, @dates) = ('', '', '', '', '', ());

とすれば読み込めて、表示はする

しかし、
blosxom starter kit(以下BSK)のwritbackが出力するwbファイル

title:
name:
blog_name:
url:
comment:
excerpt:
date:
-----

writbackplusが出力するwbファイル

name:
url:
date:
title:
comment:
excerpt:
blog_name:
ip:
-----

と言う違いがありblog_nameが後ろ過ぎて読み込まれない
58〜76行目の

    #my @dates = ();
    foreach (reverse(@tmp)) {
      my ($entrytitle, $body, $name, $url, $date, @dates) = ('', '', '', '', '', ());
      if($_ =~ /[\r\n]+$mode:(.+)/) {
        $count++;
        $body = $1;
        if($count == 1) {
          $entrytitle = &gettitle($file);
          $entry++;
        }
      }
      if($_ =~ /[\r\n]+blog_name:(.+)/ and $_ =~ /[\r\n]+url:(.+)/) {
        $url = $1;
      }
      if($_ =~ /^name:(.+)/ or $_ =~ /[\r\n]+blog_name:(.+)/) {
        $name = $1;
      }else {
        $name = "no name";
      }

このあたりをいじれば良さそうなんだけど……何か良い方法はないだろうか？
むしろwbファイルの方を同じにすればいいのかなー

Blog Bookmarks.さんではもう導入されているようです
聞いてみようかなぁ？