<@> <@> Movable Type形式 <@> <$logs = argv#0> <$option = argv#1> <@ifexec(! logs, begin)> Movable Type形式 行頭ハイフン('-')をすべてエスケープする(通常は不要)
出力文字コード
<$break()> <$end> <@>----------------------------------------------------------------------------- <@> Movable Type形式 exporter <@>----------------------------------------------------------------------------- <$exporter = loadpm('Diary::ExportMT')> <$ifbreak(error_flag)> <$print("Content-Disposition: attachment; filename=<@v.diary_id><@option.year>_export_mt.txt\n")> <$print("Content-Type: text/plain; charset=<@option.charset>;\n\n")> <$exporter.export( begin.day, logs, option )><$t=tmp> AUTHOR: <@t.name> TITLE: <@t.title> STATUS: <@t.status> CONVERT BREAKS: <@t.convert_breaks> ALLOW COMMENTS: <@t.allow_com> ALLOW PINGS: <@t.allow_tb> DATE: <@tm_printf("%m/%d/%Y %H:%M:%S", t.tm, 0)> CATEGORY: <@t.category> ----- BODY: <@t.body> ----- EXTENDED BODY: <@t.ex_body> ----- EXCERPT: ----- KEYWORDS: ----- <@> <@> コメントの生成 <@> <@ifexec(! option.no_comment, begin.comment )> <@forexec(t2, v.load_comments(t), begin)> COMMENT: AUTHOR: <@t2.name> EMAIL: <@t2.email> URL: <@t2.url> IP: <@t2.ip> DATE: <@tm_printf("%m/%d/%Y %H:%M:%S", t2.tm, 0)> <@exporter.br2lf( t2.text )> ----- <$end> <$end.comment> <@> <@> トラックバックの生成 <@> <@ifexec(! option.no_tb, begin.trackback )> <@forexec(t2, v.load_trackbacks(t), begin)> PING: TITLE: <@t2.title> URL: <@t2.name> IP: <@t2.ip> BLOG NAME: <@t2.blog_name> DATE: <@tm_printf("%m/%d/%Y %H:%M:%S", t2.tm, 0)> <@exporter.br2lf( t2.text )> ----- <$end> <$end.trackback> -------- <$end.day> <@> <@> 終了 <@> <$exit(0)>