The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use strict;
use Test::More tests => 91;

use_ok('Number::Phone::JP', 'class2');

my $tel = Number::Phone::JP->new;
ok($tel->set_number('009120 12345678')->is_valid_number, 'checking for 009120 12345678');
ok($tel->set_number('009121 12345678')->is_valid_number, 'checking for 009121 12345678');
ok($tel->set_number('009130 12345678')->is_valid_number, 'checking for 009130 12345678');
ok($tel->set_number('009155 12345678')->is_valid_number, 'checking for 009155 12345678');
ok($tel->set_number('009156 12345678')->is_valid_number, 'checking for 009156 12345678');
ok($tel->set_number('009177 12345678')->is_valid_number, 'checking for 009177 12345678');
ok($tel->set_number('009181 12345678')->is_valid_number, 'checking for 009181 12345678');
ok($tel->set_number('009191 12345678')->is_valid_number, 'checking for 009191 12345678');
ok($tel->set_number('009192 12345678')->is_valid_number, 'checking for 009192 12345678');
ok($tel->set_number('009198 12345678')->is_valid_number, 'checking for 009198 12345678');
ok(!$tel->set_number('009100 12345678')->is_valid_number, 'checking for 009100 12345678');
ok(!$tel->set_number('009101 12345678')->is_valid_number, 'checking for 009101 12345678');
ok(!$tel->set_number('009102 12345678')->is_valid_number, 'checking for 009102 12345678');
ok(!$tel->set_number('009103 12345678')->is_valid_number, 'checking for 009103 12345678');
ok(!$tel->set_number('009104 12345678')->is_valid_number, 'checking for 009104 12345678');
ok(!$tel->set_number('009105 12345678')->is_valid_number, 'checking for 009105 12345678');
ok(!$tel->set_number('009106 12345678')->is_valid_number, 'checking for 009106 12345678');
ok(!$tel->set_number('009107 12345678')->is_valid_number, 'checking for 009107 12345678');
ok(!$tel->set_number('009108 12345678')->is_valid_number, 'checking for 009108 12345678');
ok(!$tel->set_number('009109 12345678')->is_valid_number, 'checking for 009109 12345678');
ok(!$tel->set_number('009122 12345678')->is_valid_number, 'checking for 009122 12345678');
ok(!$tel->set_number('009123 12345678')->is_valid_number, 'checking for 009123 12345678');
ok(!$tel->set_number('009124 12345678')->is_valid_number, 'checking for 009124 12345678');
ok(!$tel->set_number('009125 12345678')->is_valid_number, 'checking for 009125 12345678');
ok(!$tel->set_number('009126 12345678')->is_valid_number, 'checking for 009126 12345678');
ok(!$tel->set_number('009127 12345678')->is_valid_number, 'checking for 009127 12345678');
ok(!$tel->set_number('009128 12345678')->is_valid_number, 'checking for 009128 12345678');
ok(!$tel->set_number('009129 12345678')->is_valid_number, 'checking for 009129 12345678');
ok(!$tel->set_number('009131 12345678')->is_valid_number, 'checking for 009131 12345678');
ok(!$tel->set_number('009132 12345678')->is_valid_number, 'checking for 009132 12345678');
ok(!$tel->set_number('009133 12345678')->is_valid_number, 'checking for 009133 12345678');
ok(!$tel->set_number('009134 12345678')->is_valid_number, 'checking for 009134 12345678');
ok(!$tel->set_number('009135 12345678')->is_valid_number, 'checking for 009135 12345678');
ok(!$tel->set_number('009136 12345678')->is_valid_number, 'checking for 009136 12345678');
ok(!$tel->set_number('009137 12345678')->is_valid_number, 'checking for 009137 12345678');
ok(!$tel->set_number('009138 12345678')->is_valid_number, 'checking for 009138 12345678');
ok(!$tel->set_number('009139 12345678')->is_valid_number, 'checking for 009139 12345678');
ok(!$tel->set_number('009140 12345678')->is_valid_number, 'checking for 009140 12345678');
ok(!$tel->set_number('009141 12345678')->is_valid_number, 'checking for 009141 12345678');
ok(!$tel->set_number('009142 12345678')->is_valid_number, 'checking for 009142 12345678');
ok(!$tel->set_number('009143 12345678')->is_valid_number, 'checking for 009143 12345678');
ok(!$tel->set_number('009144 12345678')->is_valid_number, 'checking for 009144 12345678');
ok(!$tel->set_number('009145 12345678')->is_valid_number, 'checking for 009145 12345678');
ok(!$tel->set_number('009146 12345678')->is_valid_number, 'checking for 009146 12345678');
ok(!$tel->set_number('009147 12345678')->is_valid_number, 'checking for 009147 12345678');
ok(!$tel->set_number('009148 12345678')->is_valid_number, 'checking for 009148 12345678');
ok(!$tel->set_number('009149 12345678')->is_valid_number, 'checking for 009149 12345678');
ok(!$tel->set_number('009150 12345678')->is_valid_number, 'checking for 009150 12345678');
ok(!$tel->set_number('009151 12345678')->is_valid_number, 'checking for 009151 12345678');
ok(!$tel->set_number('009152 12345678')->is_valid_number, 'checking for 009152 12345678');
ok(!$tel->set_number('009153 12345678')->is_valid_number, 'checking for 009153 12345678');
ok(!$tel->set_number('009154 12345678')->is_valid_number, 'checking for 009154 12345678');
ok(!$tel->set_number('009157 12345678')->is_valid_number, 'checking for 009157 12345678');
ok(!$tel->set_number('009158 12345678')->is_valid_number, 'checking for 009158 12345678');
ok(!$tel->set_number('009159 12345678')->is_valid_number, 'checking for 009159 12345678');
ok(!$tel->set_number('009160 12345678')->is_valid_number, 'checking for 009160 12345678');
ok(!$tel->set_number('009161 12345678')->is_valid_number, 'checking for 009161 12345678');
ok(!$tel->set_number('009162 12345678')->is_valid_number, 'checking for 009162 12345678');
ok(!$tel->set_number('009163 12345678')->is_valid_number, 'checking for 009163 12345678');
ok(!$tel->set_number('009164 12345678')->is_valid_number, 'checking for 009164 12345678');
ok(!$tel->set_number('009165 12345678')->is_valid_number, 'checking for 009165 12345678');
ok(!$tel->set_number('009166 12345678')->is_valid_number, 'checking for 009166 12345678');
ok(!$tel->set_number('009167 12345678')->is_valid_number, 'checking for 009167 12345678');
ok(!$tel->set_number('009168 12345678')->is_valid_number, 'checking for 009168 12345678');
ok(!$tel->set_number('009169 12345678')->is_valid_number, 'checking for 009169 12345678');
ok(!$tel->set_number('009170 12345678')->is_valid_number, 'checking for 009170 12345678');
ok(!$tel->set_number('009171 12345678')->is_valid_number, 'checking for 009171 12345678');
ok(!$tel->set_number('009172 12345678')->is_valid_number, 'checking for 009172 12345678');
ok(!$tel->set_number('009173 12345678')->is_valid_number, 'checking for 009173 12345678');
ok(!$tel->set_number('009174 12345678')->is_valid_number, 'checking for 009174 12345678');
ok(!$tel->set_number('009175 12345678')->is_valid_number, 'checking for 009175 12345678');
ok(!$tel->set_number('009176 12345678')->is_valid_number, 'checking for 009176 12345678');
ok(!$tel->set_number('009178 12345678')->is_valid_number, 'checking for 009178 12345678');
ok(!$tel->set_number('009179 12345678')->is_valid_number, 'checking for 009179 12345678');
ok(!$tel->set_number('009180 12345678')->is_valid_number, 'checking for 009180 12345678');
ok(!$tel->set_number('009182 12345678')->is_valid_number, 'checking for 009182 12345678');
ok(!$tel->set_number('009183 12345678')->is_valid_number, 'checking for 009183 12345678');
ok(!$tel->set_number('009184 12345678')->is_valid_number, 'checking for 009184 12345678');
ok(!$tel->set_number('009185 12345678')->is_valid_number, 'checking for 009185 12345678');
ok(!$tel->set_number('009186 12345678')->is_valid_number, 'checking for 009186 12345678');
ok(!$tel->set_number('009187 12345678')->is_valid_number, 'checking for 009187 12345678');
ok(!$tel->set_number('009188 12345678')->is_valid_number, 'checking for 009188 12345678');
ok(!$tel->set_number('009189 12345678')->is_valid_number, 'checking for 009189 12345678');
ok(!$tel->set_number('009190 12345678')->is_valid_number, 'checking for 009190 12345678');
ok(!$tel->set_number('009193 12345678')->is_valid_number, 'checking for 009193 12345678');
ok(!$tel->set_number('009194 12345678')->is_valid_number, 'checking for 009194 12345678');
ok(!$tel->set_number('009195 12345678')->is_valid_number, 'checking for 009195 12345678');
ok(!$tel->set_number('009196 12345678')->is_valid_number, 'checking for 009196 12345678');
ok(!$tel->set_number('009197 12345678')->is_valid_number, 'checking for 009197 12345678');
ok(!$tel->set_number('009199 12345678')->is_valid_number, 'checking for 009199 12345678');