POE使ってるときにBlockingが発生するモジュールとか呼ぶとせっかくのPOEが台無しだよー。とCTOに相談したら、forkするんでよければPOE::Component::Genericというのがあるよと教えてもらった。 これ使うと割と楽ちんに親子で通信したりなんだりができるみたい。へぇー。
CPANにSWF::Builderというのがあるのでそれで試してみました。 #!/usr/bin/perl use strict; use utf8; use SWF::Builder; my $movie = SWF::Builder->new ( FrameRate => 15, FrameSize => [0, 0, 400, 400], BackgroundColor => 'ffffff' ); my $font = $movie->new_font('msgothic.ttc'); my $text = $movie->new_static_text($font) ->size(10) ->color('000000') ->text("こんにちわ") ->place; $movie->save('ttf.swf');ほとんどSYNOPSISのコピペ。 cygwin上の5.8で
MTBlogTimesをPlaggerで動かすようにしてみたのですが、なにを寝ぼけていたのかこのままだと複数のフィードの場合うまくいきません。 publish.finalizeで購読しているフィード全体の投稿時間を出力するようにするか、idを基に個別に画像を出力するように変更します。 package Plagger::Plugin::Publish::BlogTimes; use strict; use base qw( Plagger::Plugin ); use File::Spec; use GD; sub register { my($self, $context) = @_; $context->register_hook( $self, 'publish.feed' => \&feed, ); } sub feed { my ( $self, $context, $args )
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く