はてなダイアリーライター 1.3.0 って、Crypt::SSLeay が入ってない場合でも、あたかも正しくログインできたかのように振舞い、POST する段階でエラーを吐きます。Crypt::SSLeay が入っていない場合には HTTP 接続をするように ad-hoc なパッチを書いてみました。
このパッチは、1.3.1 で取り込んで頂きました。
パッチ
--- hw.pl.orig 2005-10-04 14:42:09.000000000 +0900 +++ hw.pl 2005-10-04 20:14:40.000000000 +0900 @@ -76,6 +76,13 @@ # Hatena URL. my $hatena_url = 'http://d.hatena.ne.jp'; my $hatena_sslregister_url = 'https://www.hatena.ne.jp/login'; +eval { + require Crypt::SSLeay; +}; +if ($@) { + print "Crypt::SSLeay not found, use non-encrypted HTTP mode.\n"; + $hatena_sslregister_url = 'http://www.hatena.ne.jp/login'; +} # Option for LWP::UserAgent. my %ua_option = (
Leave a comment