line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
package Encode::VN; |
2
|
1
|
|
|
1
|
|
52939
|
use 5.007003; |
|
1
|
|
|
|
|
3
|
|
|
1
|
|
|
|
|
58
|
|
3
|
|
|
|
|
|
|
our $VERSION = '0.06'; |
4
|
1
|
|
|
1
|
|
5
|
use Encode; |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
92
|
|
5
|
1
|
|
|
1
|
|
6
|
use XSLoader; |
|
1
|
|
|
|
|
7
|
|
|
1
|
|
|
|
|
168
|
|
6
|
|
|
|
|
|
|
XSLoader::load(__PACKAGE__,$VERSION); |
7
|
|
|
|
|
|
|
|
8
|
|
|
|
|
|
|
Encode::define_alias( qr/\bVNI(-ANSI)?$/i => '"x-viet-vni"' ); |
9
|
|
|
|
|
|
|
Encode::define_alias( qr/\bVNI-ASCII$/i => '"x-viet-vni-ascii"' ); |
10
|
|
|
|
|
|
|
Encode::define_alias( qr/\bVNI-Mac$/i => '"x-viet-vni-mac"' ); |
11
|
|
|
|
|
|
|
Encode::define_alias( qr/\bVNI-Email$/i => '"x-viet-vni-email"' ); |
12
|
|
|
|
|
|
|
Encode::define_alias( qr/\bVPS$/i => '"x-viet-vps"' ); |
13
|
|
|
|
|
|
|
|
14
|
|
|
|
|
|
|
1; |
15
|
|
|
|
|
|
|
__END__ |