PlaggerLDR

plaggerldr_server.pl を書き換えた CGI版の plaggerldr.cgi を動かそうとしていたのですが、結局ひっかかっていたのは .htaccess で setenv PERL5LIB /home/nirvash/perl/lib が有効でなかったということでした。なので、cgi の頭で use lib qw(/home/nirvash/perl/lib); しておきました。

フィードの Title と Link を書き換える Filter を作ってこれで完了。しばらく稼動させてバグ修正。

  • Store::DBIC は Feed の Link で識別するので、フィルタリングして作成したフィードがユニークになるように書き換えてあげたり、適切なタイトルをつけるための書き換え用フィルタ。
package Plagger::Plugin::Filter::RewriteFeedInfo;
use strict;
use base qw( Plagger::Plugin );

sub register {
    my($self, $context) = @_;
    $context->register_hook(
        $self,
        'update.feed.fixup' => \&filter,
    );
}

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

    $args->{feed}->{link}  = $self->conf->{link}  if $self->conf->{link};
    $args->{feed}->{title} = $self->conf->{title} if $self->conf->{title};
}

1;