NAME Parse::JapanesePostalCode - PostalCode Parser for ж—Ґжњ¬йѓµж”ї SYNOPSIS use Parse::JapanesePostalCode; my $parser = Parse::JapanesePostalCode->new( file => 'KEN_ALL.csv' ); while (my $obj = $parser->fetch_obj) { my @list = map { $_ ? $_ : () } ($obj->zip, $obj->pref, $obj->district, $obj->city, $obj->ward, $obj->town); if ($obj->has_subtown) { push @list, join '/', @{ $obj->subtown }; } if ($obj->build) { my $str = $obj->build; $str .= $obj->floor . 'F' if $obj->floor; push @list, $str; } } DESCRIPTION Parse::JapanesePostalCode is a feel good parser to parse to Postal Code files that are provided by Japan Post. Parse::JapanesePostalCode は、日本郵政が提供している郵便番号ファイルを良い感гЃгЃ«гѓ‘гѓјг‚№гЃ—гЃ¦гЃЏг‚Њг‚‹гѓ‘гѓјг‚µгЃ§гЃ™гЂ‚ METHODS new create to parser instance. read from file path. my $parser = Parse::JapanesePostalCode->new( file => 'foo/bar/KEN_ALL.csv', ); read from file handle. my $parser = Parse::JapanesePostalCode->new( fh => $ken_all_fh, ); ignore katakana_h2z. my $parser = Parse::JapanesePostalCode->new( file => 'foo/bar/KEN_ALL.csv', katakana_h2z => 0, ); ignore alnum_z2h. my $parser = Parse::JapanesePostalCode->new( file => 'foo/bar/KEN_ALL.csv', alnum_z2h => 0, ); get_line get one line from KEN_ALL.csv. while (my $line = $parser->get_line) { say $line; } 1иЎЊиЄгЃїиѕјгЃїгЃѕгЃ™гЂ‚г‚‚гЃ— 07543,"97906","9790622","пѕЊпЅёпЅјпѕЏпЅ№пѕќ","пѕЊпѕЂпѕЉпѕћпЅёпѕћпѕќпѕ„пѕђпЅµпЅ¶пѕЏпѕЃ","пЅ№пЅ¶пѕћпѕ”(пѕЏпЅґпЅ¶пѕњпѕЉпѕ—232-244пЅ¤311пЅ¤312пЅ¤337-862пѕЉпѕћпѕќпѕЃ","з¦Џеі¶зњЊ","双葉郡富岡町","жЇ›иђ±пј€е‰Ќе·ќеЋџпј’пј“пј’гЂњпј’пј”пј”гЂЃпј“пј‘пј‘гЂЃпј“пј‘пј’гЂЃпј“пј“пј—гЂњпјпј–пј’з•Єењ°",1,1,0,0,0,0 07543,"97906","9790622","пѕЊпЅёпЅјпѕЏпЅ№пѕќ","пѕЊпѕЂпѕЉпѕћпЅёпѕћпѕќпѕ„пѕђпЅµпЅ¶пѕЏпѕЃ","пѕ„пЅіпЅ·пЅ®пЅіпѕѓпѕћпѕќпѕпЅ®пЅёпѕЊпЅёпЅјпѕЏпѕЂпѕћпЅІ2пЅ№пѕћпѕќпЅјпѕпЅ®пЅёпѕЉпѕ‚пѕѓпѕћпѕќпЅјпЅ®пЅєпЅіпѕ…пЅІ)","з¦Џеі¶зњЊ","双葉郡富岡町","〔東京電力福島第二原еђеЉ›з™єй›»ж‰Ђж§‹е†…гЂ•пј‰",1,1,0,0,0,0 のように複数行に分割されていたら、良い感гЃгЃ«иЎЊг‚’гѓћгѓјг‚ёгЃ—гЃџзµђжћњг‚’иї”гЃ—гЃѕгЃ™гЂ‚ fetch_obj get one line object from KEN_ALL.csv. while (my $obj = $parser->fetch_obj) { say $obj->zip; } get_line гЃ§еЏ–еѕ—гЃ—гЃџиЎЊг‚’гЂЃ Parse::JapanesePostalCode::Row でオブジェクト化したオブジェクトを返します。 AUTHOR Kazuhiro Osawa <yappo {at} shibuya {dot} pl> SEE ALSO Parse::JapanesePostalCode::Row, <http://www.post.japanpost.jp/zipcode/download.html> LICENSE This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.