1=head1 NAME 2 3Encode::JP::Emoji::Property - Emoji named character properties 4 5=head1 SYNOPSIS 6 7 use utf8; 8 use Encode::JP::Emoji::Property; 9 10 /\p{InEmojiDoCoMo}/; 11 /\p{InEmojiKDDIapp}/; 12 /\p{InEmojiKDDIweb}/; 13 /\p{InEmojiSoftBank}/; 14 /\p{InEmojiUnicode}/; 15 /\p{InEmojiGoogle}/; 16 /\p{InEmojiMixed}/; 17 /\p{InEmojiAny}/; 18 19=head1 DESCRIPTION 20 21This exports the following named character properties: 22 23=head2 \p{InEmojiDoCoMo} 24 25This matches DoCoMo's private emoji code points: C<U+E63E> ... C<U+E757>. 26 27=head2 \p{InEmojiKDDIapp} 28 29This matches KDDI's private emoji code points: C<U+E468> ... C<U+EB8E>. 30 31=head2 \p{InEmojiKDDIweb} 32 33This matches B<undocumented version> of KDDI's private emoji code points: C<U+EC40> ... C<U+F0FC>. 34 35=head2 \p{InEmojiSoftBank} 36 37This matches SoftBank's private emoji code points: C<U+E001> ... C<U+E53E>. 38 39=head2 \p{InEmojiMixed} 40 41This matches emoji code points of all three carriers above. 42 43=head2 \p{InEmojiGoogle} 44 45This matches Google's private emoji code points: C<U+FE000> ... C<U+FEEA0>. 46 47=head2 \p{InEmojiUnicode} 48 49This matches emoji code points which will be defined in the Unicode Standard. 50 51=head2 \p{InEmojiAny} 52 53This matches any emoji code points above. 54 55=head1 AUTHOR 56 57Yusuke Kawasaki, L<http://www.kawa.net/> 58 59=head1 SEE ALSO 60 61L<Encode::JP::Emoji> and L<perlunicode> 62 63=head1 COPYRIGHT 64 65Copyright 2009-2010 Yusuke Kawasaki, all rights reserved. 66 67=cut 68 69package Encode::JP::Emoji::Property; 70use strict; 71use warnings; 72use Encode::JP::Emoji::Mapping; 73use base 'Exporter'; 74 75our $VERSION = '0.60'; 76 77our @EXPORT = qw( 78 InEmojiDoCoMo 79 InEmojiKDDIapp 80 InEmojiKDDIweb 81 InEmojiSoftBank 82 InEmojiUnicode 83 InEmojiGoogle 84 InEmojiMixed 85 InEmojiAny 86); 87 88*InEmojiDoCoMo = \&Encode::JP::Emoji::Mapping::InEmojiDocomoUnicode; 89*InEmojiKDDIapp = \&Encode::JP::Emoji::Mapping::InEmojiKddiUnicode; # CAUTION! 90*InEmojiKDDIweb = \&Encode::JP::Emoji::Mapping::InEmojiKddiwebUnicode; 91*InEmojiSoftBank = \&Encode::JP::Emoji::Mapping::InEmojiSoftbankUnicode; 92*InEmojiUnicode = \&Encode::JP::Emoji::Mapping::InEmojiUnicodeUnicode; 93*InEmojiGoogle = \&Encode::JP::Emoji::Mapping::InEmojiGoogleUnicode; 94*InEmojiMixed = \&Encode::JP::Emoji::Mapping::InEmojiMixedUnicode; 95 96sub InEmojiAny { return <<"EOT"; } 97+Encode::JP::Emoji::Property::InEmojiDoCoMo 98+Encode::JP::Emoji::Property::InEmojiKDDIapp 99+Encode::JP::Emoji::Property::InEmojiKDDIweb 100+Encode::JP::Emoji::Property::InEmojiSoftBank 101+Encode::JP::Emoji::Property::InEmojiUnicode 102+Encode::JP::Emoji::Property::InEmojiGoogle 103EOT 104 1051; 106