12 lines
137 B
Perl
12 lines
137 B
Perl
|
#!/usr/bin/env perl
|
||
|
|
|
||
|
|
use v5.38.2;
|
||
|
|
|
||
|
|
use File::Basename;
|
||
|
|
|
||
|
|
use lib dirname(dirname(__FILE__)).'/lib';
|
||
|
|
|
||
|
|
use JapaChar;
|
||
|
|
|
||
|
|
JapaChar->new->start;
|