$B%-! $BO$+$iF|K\$N=;=j$r4hD%$C$F=PNO (B shibuya.pl / $BBgBtOB9( (B(Yappo) $B%"%8%'%s%@ (B $BF|K\$N=;=j%k! $BCj=PJ}K!9M$($k (B Regexp::Assemble $B%N! $BJQ$C$?=;=j (B $B:G8e$K (B
( )いーあるさんいーあるさんわんつーすりー (3)id:amachangの プレゼンツールを パクりました ( )どーまんせーまんどーまんせーまん (2)他のLTとネタ かぶりすぎ>< ( )ひふみひふみひふみひふみひひふみ (2)なので基本 詳細やりません ( )ひひひひひひひひひひひひひひひひ (1) ( ) ( )獅子手奈緒(14) (1)本題 ( )鈍痛鈍痛鈍痛鈍痛鈍痛鈍痛鈍痛鈍痛鈍痛 (t)アジェンダ (l)インスパイアツール逹 (l)言語を超えて (l)Webの世界へ (l)??? ( )柿ピー☆柿ピー☆柿ピー☆柿ピー☆ (t)インスパイアツール達 (l)plaなんとかの登場で (l)プラガブルな便利ツール (l)いっぱい登場しました (l)さらっと紹介 ( )winnywinnywinnywinnywinnywinnywinny (t)Catlxom (l)よみがな:きゃっ
package Plagger::Plugin::Notify::Eject; use strict; use base qw( Plagger::Plugin ); sub register { my($self, $context) = @_; $context->register_hook( $self, 'publish.feed' => \&update, 'publish.finalize' => \&eject, ); $self->{count} = 0; } sub update { my($self, $context, $args) = @_; $self->{count}++ if $args->{feed}->count; } sub eject { my($self, $context, $args) = @_; system('/usr/bin/eject')
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く