File Coverage

blib/lib/Template/Plugin/JapanesePrefectures.pm
Criterion Covered Total %
statement 13 15 86.6
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 18 20 90.0


line stmt bran cond sub pod time code
1             package Template::Plugin::JapanesePrefectures;
2 1     1   30627 use strict;
  1         2  
  1         39  
3 1     1   6 use warnings;
  1         2  
  1         42  
4             our $VERSION = 0.01;
5              
6 1     1   1190 use Template::Plugin;
  1         20241  
  1         39  
7 1     1   12 use base qw(Template::Plugin);
  1         2  
  1         89  
8 1     1   547 use Geography::JapanesePrefectures::Walker;
  0            
  0            
9              
10             sub new {
11             my $class = shift;
12             my $context = shift;
13             return Geography::JapanesePrefectures::Walker->new(@_);
14             }
15              
16             =head1 NAME
17              
18             Template::Plugin::JapanesePrefectures - easliy use Geography::JapanesePrefectures.
19              
20             =head1 VERSION
21              
22             This documentation refers to Template::Plugin::JapanesePrefectures version 0.01
23              
24             =head1 SYNOPSIS
25              
26             In your template:
27              
28             [% USE pref = JapanesePrefectures('euc-jp') %]
29             [% FOR prefecture IN pref.prefectures %]
30             [% prefecture.name %]
31             [% END %]
32              
33             =head1 METHODS
34              
35             =head2 new
36              
37             create Geography::JapanesePrefectures::Walker's object
38              
39             =head1 SEE ALSO
40              
41             L
42              
43             =head1 AUTHOR
44              
45             Atsushi Kobayashi, C<< >>
46              
47             =head1 BUGS
48              
49             Please report any bugs or feature requests to
50             C, or through the web interface at
51             L.
52             I will be notified, and then you'll automatically be notified of progress on
53             your bug as I make changes.
54              
55             =head1 SUPPORT
56              
57             You can find documentation for this module with the perldoc command.
58              
59             perldoc Template::Plugin::JapanesePrefectures
60              
61             You can also look for information at:
62              
63             =over 4
64              
65             =item * AnnoCPAN: Annotated CPAN documentation
66              
67             L
68              
69             =item * CPAN Ratings
70              
71             L
72              
73             =item * RT: CPAN's request tracker
74              
75             L
76              
77             =item * Search CPAN
78              
79             L
80              
81             =back
82              
83             =head1 ACKNOWLEDGEMENTS
84              
85             =head1 COPYRIGHT & LICENSE
86              
87             Copyright 2006 Atsushi Kobayashi, all rights reserved.
88              
89             This program is free software; you can redistribute it and/or modify it
90             under the same terms as Perl itself.
91              
92             =cut
93              
94             1; # End of Template::Plugin::JapanesePrefectures