## This file is auto-generated (at 2008-11-24T04:21:28Z). ## Do not edit by hand! use strict; package Char::Class::JaInput; our $VERSION = '1.01'; use Exporter; use vars qw(@EXPORT_OK @ISA $VERSION); @ISA = qw(Exporter); =head1 NAME Char::Class::JaInput - Regular Expression Character Classes - C =head1 DESCRIPTION Character classes for Japanese input method =cut sub import ($;@) { my ($self, @sub) = (shift, @_); for (@sub) { no strict 'refs'; *{'main::'.$_} = \&{$_}; } $Exporter::ExportLevel = 1; $self->SUPER::import (@_); $Exporter::ExportLevel = 0; } @EXPORT_OK = qw(InJaInputBoin InJaInputDigit InJaInputEnglishSymbol InJaInputHiraganaMin InJaInputKanaSymbol InJaInputKatakana InJaInputKatakanaSymbol InJaInputKeyKatakana InJaInputLatin InJaInputLatinCapital InJaInputLatinSmall InJaInputShiin InJaInputYomi); sub InJaInputBoin { <?@{\N{YEN SIGN}}^_`{|}￣ EOH } sub InJaInputHiraganaMin { < 母音字 (JIS X 4063:2000 3.c)) =item C 数字 (JIS X 4064:2002 5.e)) =item C 英字用特殊文字 (JIS X 6002-1980 4.2.4 (1)) =item C 平仮名 (最小集合) (JIS X 4064:2002 5.a)) =item C 仮名記号 (JIS X 4064:2002 5.c)) =item C 片仮名 (最小集合) (JIS X 4064:2002 5.b)) =item C 片仮名用特殊文字 (JIS X 6002-1980 4.2.4 (2)) =item C 片仮名 (鍵盤) (JIS X 6002-1980 4.2.2) =item C 英字 (JIS X 4064:2002 5.d)) =item C 英字 (大文字) (JIS X 6002-1980 4.2.1 (1)) =item C 英字 (小文字) (JIS X 6002-1980 4.2.1 (2)) =item C 子音字 (JIS X 4063:2000 3.b)) =item C よみ文字列として交換を保証する文字 (JIS X 4062:1998 表1) =back =cut =head1 EXAMPLE use Char::Class::JaInput; if ($s =~ /\p{InLatin}/) { print "Match!\n"; } =head1 SEE ALSO JIS X 4062:1998, 『仮名漢字変換辞書交換形式 (Format for information interchange for dictionaries of Japanese input method)』, 日本工業標準調査会 (Japanese Industrial Standard Commitee (JISC), ), 1998. JIS X 4063:2000, 『仮名漢字変換システムのための英字キー入力から仮名への変換方式 (Keystroke to KANA Transfer Method Using Latin Letter Key for Japanese Input Method)』, 日本工業標準調査会), 2000. JIS X 4064:2002, 『仮名漢字変換システムの基本機能 (Basic functions of Kana‐Kanji conversion systems)』, 日本工業標準調査会, 2000. JIS X 6002-1980, 『情報処理系けん盤配列 (Keyboard Layout for Information Processing Using the JIS 7 Bit Coded Character Set)』, 日本工業標準調査会, 1980. =head1 LICENSE Copyright 2008 わかば (Wakaba) This library and the library generated by it is free software; you can redistribute them and/or modify them under the same terms as Perl itself. =cut 1; ### JaInput.pm ends here