Char::Class::Katakana - Regular Expression Character Classes - Katakana
InKatakanaAll
InKatakanaDigraph
InKatakanaHatsuon
InKatakanaSeion
InKatakanaSemiVoiced
InKatakanaSmall
InKatakanaVoiced
use Char::Class::Katakana;
if ($s =~ /\p{InSeion}/) {
print "Match!\n";
}
Copyright 2008 Wakaba <w@suika.fam.cx>
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.