# NAME Acme::Lou - Let's together with Lou Ohshiba # SYNOPSIS use utf8; use Acme::Lou qw/lou/; print lou("人生ã«ã¯ã€å¤§åˆ‡ãªä¸‰ã¤ã®è¢‹ãŒã‚ã‚Šã¾ã™ã€‚"); # => ライフã«ã¯ã€ã‚¤ãƒ³ãƒãƒ¼ã‚¿ãƒ³ãƒˆãªä¸‰ã¤ã®ãƒãƒƒã‚°ãŒã‚ã‚Šã¾ã™ã€‚ # DESCRIPTION Translate Japanese text into Lou Ohshiba (Japanese comedian) style. # METHODS ## $lou = Acme::Lou->new() Creates an Acme::Lou object. ## $lou->translate($text \[, \\%options \]) $lou = Acme->Lou->new(); $out = $lou->translate($text, { lou_rate => 50 }); Return translated unicode string. _%options_: - lou\_rate Percentage of translating. 100(default) means full, 0 means do nothing. # EXPORTS No exports by default. ## lou use Acme::Lou qw/lou/; my $text = <<'...'; 祇園精舎ã®é˜ã®å£°ã€è«¸è¡Œç„¡å¸¸ã®éŸ¿ãã‚り。 沙羅åŒæ¨¹ã®èŠ±ã®è‰²ã€ç››è€…å¿…è¡°ã®ç†ã‚’ç¾ã™ã€‚ 奢れる人も久ã—ã‹ã‚‰ãšã€å”¯æ˜¥ã®å¤œã®å¤¢ã®ã”ã¨ã—。 - 「平家物語ã€ã‚ˆã‚Š ... print lou($text); # 祇園テンプルã®ãƒ™ãƒ«ã®ãƒœã‚¤ã‚¹ã€è«¸è¡Œç„¡å¸¸ã®ã‚¨ã‚³ãƒ¼ã‚り。 # 沙羅åŒæ¨¹ã®ãƒ•ãƒ©ãƒ¯ãƒ¼ã®ã‚«ãƒ©ãƒ¼ã€ç››è€…å¿…è¡°ã®ãƒªãƒ¼ã‚ºãƒ³ã‚’ショーã™ã‚‹ã€‚ # プラウドã™ã‚Œã‚‹ãƒ’ューマンも久ã—ã‹ã‚‰ãšã€ã‚ªãƒ³ãƒªãƒ¼ã‚¹ãƒ—リングã®ã‚¤ãƒ¼ãƒ–ニングã®ãƒ‰ãƒªãƒ¼ãƒ ã®ã”ã¨ã—。 # - 「平家ストーリーã€ã‚ˆã‚Š Shortcut to `Acme::Lou->new->translate()`. # OBSOLETED FUNCTION To keep this module working, following functions are obsoleted. sorry. - html input/output # AUTHOR Naoki Tomita <tomita@cpan.org> # SEE ALSO [https://lou5.jp/](https://lou5.jp/) [http://taku910.github.io/mecab/](http://taku910.github.io/mecab/) Special thanks to Taku Kudo # LICENSE This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.