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