すみっこ

ささやかすぎて忘れてしまうので書いておく。

配列のシャッフルの決まり文句は「sort_by{ rand }」だった - ’(rubikitch wanna be (a . lisper))/ 2008年5月9日
配列のシャッフルの決まり文句は「sort_by{ rand }」だった - ’(rubikitch wanna be (a . lisper))

sort_by { rand } を挙げるときは、ランダムソート(笑)とはあたりも触れておいた方が良いと思う。
Posted at 22時59分33秒 JST/ この記事のURL
HTML Tidyがあった - ’(rubikitch wanna be (a . lisper))/ 2008年3月14日
HTML Tidyがあった - ’(rubikitch wanna be (a . lisper))

>しかし、入力するHTMLによってtidyがエラーを出したらなにも出力してくれないからこの場合は使えない。

あれ、そうだったかなと思って確認したら、最近のは config で force-output にしないと出力しないんですね。
また、改めて試してみて、入力文字コードを指定してやらないといけないのでこうした用途には向いてないと思いました。
Posted at 22時18分17秒 JST/ この記事のURL
html2xhtmlが使えない件 - ’(rubikitch wanna be (a . lisper))
html2xhtmlが使えない件 - ’(rubikitch wanna be (a . lisper))

HTML Tidy あたり使ってみるとどうでしょう。遅そうですが。
Posted at 0時44分42秒 JST/ この記事のURL
Notify::Morse/ 2006年9月8日

-. --- - .. ..-. -.--
---... ---... -- --- .-. ... .

Morse.pm

package Plagger::Plugin::Notify::Morse;
use strict;
use base qw( Plagger::Plugin );

use Text::Morse;
use Audio::Beep;

our $VERSION = '0.01';

sub register {
    my($self, $context) = @_;

    $context->register_hook(
        $self,
        'publish.entry' => \&notify,
    );
}

sub notify {
    my($self, $context, $args) = @_;

    my $title = $args->{entry}->title;

    my $morse = new Text::Morse;
    my $morse_title = scalar($morse->Encode($title));

    my %table = ( "."=>"b'3 r3", "-"=>"b'1 r3", " "=>"r1", "\n"=>"r1 r3 r3" );

    my @note = ('\bpm1800 \norel');

    foreach my $key (split('', $morse_title)) {
        push @note, $table{$key};
    }
    push @note, "r1 r1 r1";

    Audio::Beep->new->play(join ' ', @note);
}

1;
config.yaml

global:
  timezone: Asia/Tokyo
  plugin_path:
    - C:/plagger/plugins

plugins:
  - module: Subscription::Config
    config:
      feed:
        - http://del.icio.us/rss/

  - module: Filter::Rule
    rule:
      module: Deduped
      path: C:/plagger/dedupe/morse.db

  - module: Notify::Morse

HR HR BTとかARが無いと聞きにくい。
直したいけれど、明日早いのでとりあえずここまで。

Posted at 22時41分40秒 JST / Plagger / この記事のURL
Proxomitronが動かなくなった/ 2006年9月2日
proxomitronが突然動かなくなった。
特定のサイトのみ使うようにしていたため気がつくのが遅く、何が原因かさっぱり分からず。
原因はあるppmを入れたとき C:\Perl\bin に入った libeay32.dll と ssleay32.dll がproxomitronの要求するのと合っていなかったため。
エラーも何も出ないから気がつくのに一日がかりだった。
SSL通信でなくとも影響するなんて、そうそう気がつかないよ。
Posted at 0時40分51秒 JST / それPlagger関係ないよ / この記事のURL
Plagger::Plugin::Notify::Balloonのt/ 2006年8月23日

放っておくと最後になりそうなので。

use strict;
use t::TestPlagger;

test_plugin_deps;

test_requires ' Win32::Console' if ($^O eq 'MSWin32');

{
    no warnings 'once';
    *CORE::GLOBAL::system = sub {
        warn "Balloon: " . join ':', @_, "\n";
    };
}

plan tests => 1;

run_eval_expected_with_capture;

__END__

=== test file
--- input config
global:
  log:
    level: debug
plugins:
  - module: Subscription::Config
    config:
      feed:
        - file://$t::TestPlagger::BaseDirURI/t/samples/rss2sample.xml
  - module: Notify::Balloon
--- expected
like $warning, qr{Balloon: BalloonNotify:/o:5:/t:Astronauts' Dirty Laundry:/c:Compared to earlier spacecraft, the International Space Station has many luxuries, but laundry facilities are not one of them. Instead, astronauts have other options\.:};
続きを読む...
Posted at 23時31分37秒 JST / Plagger / この記事のURL
ヤプログにcodeをpostするとき/ 2006年8月19日

先の記事ではヤプログの仕様で「{}」が消えてしまった。
今日になって直したが、同じように困っている人向けに手順を公開。

  • HTMLで記事を書くにチェック。
  • 以下のスクリプトで「{」を数値実体参照に変換。
use utf8;
print '<pre class="code">', "\n";
while($str = <STDIN>) {
    $str =~ s/&/&amp;/gm;
    $str =~ s/</&lt;/gm;
    $str =~ s/>/&gt;/gm;
    $str =~ s/(\{)/'&#'.ord($1).';'/egm;
    print $str;
}
print "</pre>\n";
Posted at 10時39分49秒 JST/ この記事のURL
CustomFeed::Folder

Plaggerでザナ日誌をfeedする(3)

空白入りpathに対応したので、出来たことにして終了。Windowsでしか確認していないけれど。

Folder.pm

#{}が消えていたのを修正。(8/19)

続きを読む...
Posted at 0時26分49秒 JST / Plagger / この記事のURL
Publish::GmailをAPOP対応に/ 2006年8月17日
PlaggerのPublish::Gmailの話題。

POP bofore SMTPで、POPはだめでAPOPのみ対応しているサーバが今まで使えなかった。Perlも少し読む程度だったら出来るようになったので、patchを書いて対応した。

diff -u
Gmail.pm.patch


APOPのpasswordが平文で出てはまずいので、POP3よりAPOPの方を優先にした。
Posted at 23時41分55秒 JST / Plagger / この記事のURL
Plaggerでザナ日誌をfeedする(2)/ 2006年8月16日
少しずつ直してるのですが、config.yamlの書き方を変えたので途中でも公開。
複数フォルダ指定や、日本語フォルダ名に対応。

config.yaml
続きを読む...
Posted at 0時45分30秒 JST / Plagger / この記事のURL
プロフィール
  • プロフィール画像
  • アイコン画像 ニックネーム:sumikko
読者になる
Yapme!一覧
読者になる

 
| 次へ
Global Media Online INC.