Text::Trac - Trac Wiki 記法パーサ #1

Text::Trac を blosxom から呼び出してみる テスト

Text::Trac が形になってきたので、実際に文章を書いてテストしてみる。

もういっちょ見出しのテスト

paragraph 1
paragraph 1
paragraph 1

paragraph 2
paragraph 2
paragraph 2

  1. リスト 1
  2. リスト 2
  3. リスト 3
定義リスト1
内容その1
定義リスト2
内容その2

上の内容は実際にはこんな感じで書いてます。

= Text::Trac を blosxom から呼び出してみる テスト =

== もういっちょ見出しのテスト ==

paragraph 1[[BR]]
paragraph 1[[BR]]
paragraph 1

paragraph 2[[BR]]
paragraph 2[[BR]]
paragraph 2

 * リスト 1
 * リスト 2
 * リスト 3

 1. リスト 1
 1. リスト 2
 1. リスト 3

 定義リスト1::
   内容その1
 定義リスト2::
   内容その2

blosxom からは以下の様なプラグインで Text::Trac を呼び出してます。

# Blosxom Plugin: text_trac
# Author: Gosuke Miyashita <miya at mizzy.org>
# Version: 2006-06-20
# Blosxom Home/Docs/Licensing: http://www.blosxom.com/

package text_trac;

use strict;
use Text::Trac;

sub start {
  1;
}

sub story {
  my($pkg, $path, $filename, $story_ref, $title_ref, $body_ref) = @_;

  if ( $meta::syntax eq 'trac' ){
      my $parser = Text::Trac->new( min_heading_level => 3 );
      $parser->parse($$body_ref);
      $$body_ref = $parser->html;
  }

  return 1;
}

1;

__END__

Text::Trac 自体はもうちょいで CPAN にアップできると思います。ただし、Yappo さんご所望の機能はもう少し時間ください。