Template::Plugin::JapanesePrefectures

Perl

TTではこんな感じで使うべし。



package Template::Plugin::JapanesePrefectures;

use strict;

use warnings;

our $VERSION = 0.01;
use Template::Plugin;

use base qw(Template::Plugin);

use Geography::JapanesePrefectures::Walker;
sub new {

    my $class = shift;

    my $context = shift;

    return Geography::JapanesePrefectures::Walker->new(@_);

}
1;

待てなかった。
ごめんね某氏。