line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
package Encode::HP; |
2
|
1
|
|
|
1
|
|
113859
|
use 5.007003; |
|
1
|
|
|
|
|
3
|
|
|
1
|
|
|
|
|
51
|
|
3
|
|
|
|
|
|
|
our $VERSION = '0.03'; |
4
|
1
|
|
|
1
|
|
5
|
use Encode; |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
105
|
|
5
|
1
|
|
|
1
|
|
7
|
use XSLoader; |
|
1
|
|
|
|
|
7
|
|
|
1
|
|
|
|
|
208
|
|
6
|
|
|
|
|
|
|
XSLoader::load(__PACKAGE__,$VERSION); |
7
|
|
|
|
|
|
|
|
8
|
|
|
|
|
|
|
Encode::define_alias( qr/\bgreek8$/i => '"hp-greek8"' ); |
9
|
|
|
|
|
|
|
Encode::define_alias( qr/\br(oman)?8$/i => '"hp-roman8"' ); |
10
|
|
|
|
|
|
|
Encode::define_alias( qr/\br(oman)?9$/i => '"hp-roman9"' ); |
11
|
|
|
|
|
|
|
Encode::define_alias( qr/\bthai8$/i => '"hp-thai8"' ); |
12
|
|
|
|
|
|
|
Encode::define_alias( qr/\bturkish8$/i => '"hp-turkish8"' ); |
13
|
|
|
|
|
|
|
|
14
|
|
|
|
|
|
|
1; |
15
|
|
|
|
|
|
|
__END__ |