![]() |
![]()
| ![]() |
![]()
NAMELingua::JA::Romanize::MeCab - Romanization of Japanese language with MeCab SYNOPSISuse Lingua::JA::Romanize::MeCab; my $conv = Lingua::JA::Romanize::MeCab->new(); my $roman = $conv->char( $kanji ); printf( "<ruby><rb>%s</rb><rt>%s</rt></ruby>", $kanji, $roman ); my @array = $conv->string( $string ); foreach my $pair ( @array ) { my( $raw, $ruby ) = @$pair; if ( defined $ruby ) { printf( "<ruby><rb>%s</rb><rt>%s</rt></ruby>", $raw, $ruby ); } else { print $raw; } } DESCRIPTIONThis is a MeCab version of Lingua::JA::Romanize::Japanese module. This requires MeCab.pm module which is distributed in mecab-perl-0.xx.tar.gz package. UTF-8 FLAGThis treats utf8 flag transparently. SEE ALSOLingua::JA::Romanize::Japanese http://mecab.sourceforge.jp/ (Japanese) COPYRIGHT AND LICENSECopyright (c) 2006-2008 Yusuke Kawasaki. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
|