blib/lib/Lingua/JA/Halfwidth/Katakana.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
statement | 13 | 13 | 100.0 |
branch | n/a | ||
condition | n/a | ||
subroutine | 5 | 5 | 100.0 |
pod | 0 | 1 | 0.0 |
total | 18 | 19 | 94.7 |
line | stmt | bran | cond | sub | pod | time | code |
---|---|---|---|---|---|---|---|
1 | package Lingua::JA::Halfwidth::Katakana; | ||||||
2 | |||||||
3 | 3 | 3 | 27919 | use 5.008_001; | |||
3 | 11 | ||||||
3 | 125 | ||||||
4 | 3 | 3 | 20 | use strict; | |||
3 | 3 | ||||||
3 | 91 | ||||||
5 | 3 | 3 | 22 | use warnings; | |||
3 | 7 | ||||||
3 | 98 | ||||||
6 | 3 | 3 | 13 | use Exporter qw/import/; | |||
3 | 6 | ||||||
3 | 371 | ||||||
7 | |||||||
8 | our $VERSION = '0.90'; | ||||||
9 | our @EXPORT = qw(InHalfwidthKatakana); | ||||||
10 | our @EXPORT_OK = qw(); | ||||||
11 | |||||||
12 | 5 | 5 | 0 | 310733 | sub InHalfwidthKatakana { "FF65\tFF9F"; } | ||
13 | |||||||
14 | 1; | ||||||
15 | __END__ |