はてダロ

コンピュータ

http://d.hatena.ne.jp/rin_ne/20050216

はてダロ 0.6.0を使ってみたんだけど、

日記の最後の部分。
</textarea>
<table width="100%" cellpadding="0" cellspacing="0" style="margin: 0; padding: 0
">
<tr>
<td>

みたいにtextadreaの後ろの部分が残ったままになっている(こういう仕様なのかな)。
環境は、

  • NetBSD-1.6.2
  • perl-5.8.6nb3(pkgsrcでインストール)
  • p5-libwww-5.76nb2(pkgsrcでインストール)

以下、patch。

--- hl.pl.orig  Sperl-5.8.6nb3at Feb 26 08:42:27 2005
+++ hl.pl       Sat Feb 26 08:42:41 2005
@@ -319,7 +319,7 @@
     # Get title and body.
     $form_data =~ /<input .*?class="field" .*?name="title" .*?value="(.*?)".*?>/;
     my $title = $1 . "\n";
-    $form_data =~ /<textarea .*?>(.*)<\/textarea>/s;
+    $form_data =~ /<textarea .*?>(.*?)<\/textarea>/s;
     my $body = $1;
     
     # Escape string.