CallbackTest01

構成

$MT_DIR/
|__ plugins/
|  |__ CallbackTest01/
|     |__ config.yaml
|     |__ lib/                    
|     |  |__ CallbackTest01
|            |__ Callback.pm
 
 
 

ソース

config.yaml

id: callback01
key: CallbackTest01
name: CallbackTest01
version: 0.00
 
callbacks:
    # テンプレート構築後に実行
    build_page: $CallbackTest01::CallbackTest01::Callback::hdlr_func01
 
 

lib/CallbackTest01/Callback.pm

package CallbackTest01::Callback;
 
use strict;
 
use MT::FileMgr;
use Data::Dumper;
 
sub hdlr_func01{
 
    # 引数を取得
    # $cb   : コールバッククラスオブジェクト
    # %args : 各オブジェクトのハッシュ
    my ($cb, %args) = @_;
 
    # ブログ情報
    my $blog = $args{blog};
 
    # ファイルパス
    my $file = $args{file};
 
    # 記事、ウェブページ情報
    my $entry = $args{entry};
 
    # アーカイブタイプ
    my $archive_type = $args{archive_type};
 
    # 生成されたHTML情報
    my $content = $args{content};
 
debug($blog);
 
    # 置き換えデータ
    my $html = $blog->name . ":" . $entry->title . "(" . $entry->class . ")";
 
    # 取得データを置き換えて作成
    $$content =~ s!</body>!$html\n</body>!;
}
 
sub debug{
 
    my ($data) = @_;
 
    $Data::Dumper::Terse = 1;
    $Data::Dumper::Indent = 1;
    my $dump = Dumper($data);
 
    my $file = "/home/httpd/cgi-bin/mt/aaa.txt";
    my $fmgr = MT::FileMgr->new('Local');
    $fmgr->put_data($dump, $file);
}
 
1;
 
 



最終更新:2012年02月04日 10:40