our $VERSION = 1.20250323211838;
my $formatters = [
{
'format' => '$1 $2',
'intl_format' => 'NA',
'leading_digits' => '[17]99',
'national_rule' => '0$1',
'pattern' => '(\\d{3})(\\d{4})'
},
{
'format' => '$1 $2',
'leading_digits' => '80',
'national_rule' => '0$1',
'pattern' => '(\\d{2})(\\d{5})'
},
{
'format' => '$1 $2',
'intl_format' => 'NA',
'leading_digits' => '69',
'national_rule' => '0$1',
'pattern' => '(\\d{3})(\\d{4,5})'
},
{
'format' => '$1 $2',
'leading_digits' => '1',
'pattern' => '(\\d{4})(\\d{4,6})'
},
{
'format' => '$1 $2 $3 $4',
'leading_digits' => '6',
'national_rule' => '0$1',
'pattern' => '(\\d{2})(\\d{3})(\\d{2})(\\d{2})'
},
{
'format' => '$1 $2 $3',
'leading_digits' => '[357-9]',
'national_rule' => '0$1',
'pattern' => '(\\d{3})(\\d{3})(\\d{3})'
},
{
'format' => '$1 $2 $3',
'leading_digits' => '2[48]',
'national_rule' => '0$1',
'pattern' => '(\\d{2})(\\d{4})(\\d{4})'
},
{
'format' => '$1 $2 $3',
'leading_digits' => '2',
'national_rule' => '0$1',
'pattern' => '(\\d{3})(\\d{4})(\\d{3})'
}
];
my $validators = {
'fixed_line' => '
2(?:
0[3-9]|
1[0-689]|
2[0-25-9]|
[38][2-9]|
4[2-8]|
5[124-9]|
6[0-39]|
7[0-7]|
9[0-4679]
)\\d{7}
',
'geographic' => '
2(?:
0[3-9]|
1[0-689]|
2[0-25-9]|
[38][2-9]|
4[2-8]|
5[124-9]|
6[0-39]|
7[0-7]|
9[0-4679]
)\\d{7}
',
'mobile' => '
(?:
5(?:
2[238]|
59
)|
89[6-9]|
99[013-9]
)\\d{6}|
(?:
3\\d|
5[1689]|
7[06-9]|
8[1-8]|
9[0-8]
)\\d{7}
',
'pager' => '',
'personal_number' => '',
'specialrate' => '(1900\\d{4,6})|(
(?:
[17]99|
80\\d
)\\d{4}|
69\\d{5,6}
)',
'toll_free' => '
1800\\d{4,6}|
12(?:
0[13]|
28
)\\d{4}
',
'voip' => '672\\d{6}'
};
my %areanames = ();
$areanames{vi} = {"84273", "Tiền\ Giang",
"84274", "Bình\ Dương",
"84225", "Thành\ phố\ Hải\ Phòng",
"84220", "Hải\ Dương",
"84235", "Quảng\ Nam",
"84299", "Sóc\ Trăng",
"84239", "Hà\ Tĩnh",
"84290", "Cà\ Mau",
"84229", "Ninh\ Bình",
"84258", "Khánh\ Hòa",
"84221", "Hưng\ Yên",
"84263", "Lâm\ Đồng",
"84292", "Thành\ phố\ Cần\ Thơ",
"84232", "Quảng\ Bình",
"84208", "Thái\ Nguyên",
"84218", "Hòa\ Bình",
"84291", "Bạc\ Liêu",
"84222", "Bắc\ Ninh",
"84238", "Nghệ\ An",
"84277", "Đồng\ Tháp",
"84212", "Sơn\ La",
"84276", "Tây\ Ninh",
"84259", "Ninh\ Thuận",
"84228", "Nam\ Định",
"84255", "Quảng\ Ngãi",
"84211", "Vĩnh\ Phúc",
"84219", "Hà\ Giang",
"84209", "Tỉnh\ Bắc\ Kạn",
"84252", "Bình\ Thuận",
"84210", "Phú\ Thọ",
"84251", "Đồng\ Nai",
"84205", "Lạng\ Sơn",
"84215", "Điện\ Biên",
"84233", "Quảng\ Trị",
"84234", "Thừa\ Thiên\-Huế",
"84270", "Vĩnh\ Long",
"84275", "Bến\ Tre",
"84261", "Đăk\ Nông",
"8424", "Thủ\ đô\ Hà\ Nội",
"84256", "Bình\ Định",
"84262", "Đăk\ Lăk",
"84294", "Trà\ Vinh",
"84257", "Phú\ Yên",
"84293", "Hậu\ Giang",
"84260", "Kon\ Tum",
"84271", "Bình\ Phước",
"84272", "Long\ An",
"84207", "Tuyên\ Quang",
"84269", "Gia\ Lai",
"84216", "Yên\ Bái",
"84206", "Cao\ Bằng",
"84226", "Hà\ Nam",
"84237", "Thanh\ Hóa",
"84227", "Thái\ Bình",
"84236", "TP\ Đà\ Nẵng",
"84296", "An\ Giang",
"8428", "Thành\ phố\ Hồ\ Chí\ Minh",
"84254", "Bà\ Rịa\-Vũng\ Tàu",
"84297", "Kiên\ Giang",
"84213", "Lai\ Châu",
"84203", "Quảng\ Ninh",
"84204", "Bắc\ Giang",
"84214", "Lào\ Cai",};
$areanames{en} = {"84255", "Quang\ Ngai\ province",
"84211", "Vinh\ Phuc\ province",
"84212", "Son\ La\ province",
"84277", "Dong\ Thap\ province",
"84238", "Nghe\ An\ province",
"84228", "Nam\ Dinh\ province",
"84259", "Ninh\ Thuan\ province",
"84276", "Tay\ Ninh\ province",
"84210", "Phu\ Tho\ province",
"84251", "Dong\ Nai\ province",
"84215", "Dien\ Bien\ province",
"84205", "Lang\ Son\ province",
"84219", "Ha\ Giang\ province",
"84209", "Bac\ Can\ province",
"84252", "Binh\ Thuan\ province",
"84239", "Ha\ Tinh\ province",
"84229", "Ninh\ Binh\ province",
"84258", "Khanh\ Hoa\ province",
"84290", "Ca\ Mau\ province",
"84225", "Hai\ Phong\ City",
"84274", "Binh\ Duong\ province",
"84273", "Tien\ Giang\ province",
"84235", "Quang\ Nam\ province",
"84299", "Soc\ Trang\ province",
"84220", "Hai\ Duong\ province",
"84291", "Bac\ Lieu\ province",
"84208", "Thai\ Nguyen\ province",
"84218", "Hoa\ Binh\ province",
"84232", "Quang\ Binh\ province",
"84222", "Bac\ Ninh\ province",
"84263", "Lam\ Dong\ province",
"84221", "Hung\ Yen\ province",
"84292", "Can\ Tho\ City",
"84296", "An\ Giang\ province",
"84297", "Kien\ Giang\ province",
"84254", "Ba\ Ria\ Vung\ Tau\ province",
"8428", "Ho\ Chi\ Minh\ City",
"84237", "Thanh\ Hoa\ province",
"84226", "Ha\ Nam\ province",
"84236", "Da\ Nang",
"84227", "Thai\ Binh\ province",
"84204", "Bac\ Giang\ province",
"84214", "Lao\ Cai\ province",
"84213", "Lai\ Chau\ province",
"84203", "Quang\ Ninh\ province",
"84262", "Dak\ Lak\ province",
"84256", "Binh\ Dinh\ province",
"8424", "Hanoi\ City",
"84257", "Phu\ Yen\ province",
"84293", "Hau\ Giang\ province",
"84294", "Tra\ Vinh\ province",
"84270", "Ving\ Long\ province",
"84234", "Thua\ Thien\-Hue\ province",
"84233", "Quang\ Tri\ province",
"84275", "Ben\ Tre\ province",
"84261", "Dak\ Nong\ province",
"84269", "Gia\ Lai\ province",
"84207", "Tuyen\ Quang\ province",
"84272", "Long\ An\ province",
"84216", "Yen\ Bai\ province",
"84206", "Cao\ Bang\ province",
"84260", "Kon\ Tum\ province",
"84271", "Binh\ Phuoc\ province",};
my $timezones = {
'' => [
'Asia/Ho_Chi_Minh'
]
};
sub new {
my $class = shift;
my $number = shift;
$number =~ s/(^\+84|\D)//g;
my $self = bless({ country_code => '84', number => $number, formatters => $formatters, validators => $validators, timezones => $timezones, areanames => \%areanames}, $class);
return $self if ($self->is_valid());
$number =~ s/^(?:0)//;
$self = bless({ country_code => '84', number => $number, formatters => $formatters, validators => $validators, areanames => \%areanames}, $class);
return $self->is_valid() ? $self : undef;
}
1;