で、ほんとに書きたかったのはこっち。まともに使うとたちまちban食らいますけど(笑 package Plagger::Plugin::Filter::Babelfish; use strict; use base qw( Plagger::Plugin ); use Plagger::UserAgent; use WWW::Babelfish; sub register { my($self, $context) = @_; $context->register_hook( $self, 'update.entry.fixup' => \&update, ); } sub update { my($self, $context, $args) = @_; my $service = $self->conf->{service} || 'Babelfish'; my $source = $s