ÅÔÆ»Éܸ©¤ò°·¤¦ Perl ¥â¥¸¥å¡¼¥ë Geography::JapanesePrefectures ¤ò PHP ¤Ë°Ü¿¢¤·¤Æ¤ß¤¿

comments(4) | trackback(0)

<?php
class Geography_JapanesePrefectures
{
    var $_prefectures = array(
        array('id' => 1,  'name' => 'Ë̳¤Æ»',   'region' => 'Ë̳¤Æ»'),
        array('id' => 2,  'name' => 'ÀÄ¿¹¸©',   'region' =>   'ÅìËÌ'),
        array('id' => 3,  'name' => '´ä¼ê¸©',   'region' =>   'ÅìËÌ'),
        array('id' => 4,  'name' => 'µÜ¾ë¸©',   'region' =>   'ÅìËÌ'),
        array('id' => 5,  'name' => '½©Åĸ©',   'region' =>   'ÅìËÌ'),
        array('id' => 6,  'name' => '»³·Á¸©',   'region' =>   'ÅìËÌ'),
        array('id' => 7,  'name' => 'Ê¡Å縩',   'region' =>   'ÅìËÌ'),
        array('id' => 8,  'name' => '°ñ¾ë¸©',   'region' =>   '´ØÅì'),
        array('id' => 9,  'name' => 'ÆÊÌÚ¸©',   'region' =>   '´ØÅì'),
        array('id' => 10, 'name' => '·²Çϸ©',   'region' =>   '´ØÅì'),
        array('id' => 11, 'name' => 'ºë¶Ì¸©',   'region' =>   '´ØÅì'),
        array('id' => 12, 'name' => 'ÀéÍÕ¸©',   'region' =>   '´ØÅì'),
        array('id' => 13, 'name' => 'ÅìµþÅÔ',   'region' =>   '´ØÅì'),
        array('id' => 14, 'name' => '¿ÀÆàÀ', 'region' =>   '´ØÅì'),
        array('id' => 15, 'name' => '¿·³ã¸©',   'region' =>   '¿®±Û'),
        array('id' => 16, 'name' => 'ÉÙ»³¸©',   'region' =>   'ËÌΦ'),
        array('id' => 17, 'name' => 'ÀÐÀ',   'region' =>   'ËÌΦ'),
        array('id' => 18, 'name' => 'Ê¡°æ¸©',   'region' =>   'ËÌΦ'),
        array('id' => 19, 'name' => '»³Íü¸©',   'region' =>   '´ØÅì'), // ¿®±Û¤Î¾ì¹ç¤â
        array('id' => 20, 'name' => 'ĹÌ',   'region' =>   '¿®±Û'),
        array('id' => 21, 'name' => '´ôÉ츩',   'region' =>   'Å쳤'),
        array('id' => 22, 'name' => 'ÀŲ¬¸©',   'region' =>   'Å쳤'),
        array('id' => 23, 'name' => '°¦Ãθ©',   'region' =>   'Å쳤'),
        array('id' => 24, 'name' => '»°½Å¸©',   'region' =>   'Å쳤'), // ¶áµ¦¤Î¾ì¹ç¤â
        array('id' => 25, 'name' => '¼¢²ì¸©',   'region' =>   '¶áµ¦'),
        array('id' => 26, 'name' => 'µþÅÔÉÜ',   'region' =>   '¶áµ¦'),
        array('id' => 27, 'name' => 'ÂçºåÉÜ',   'region' =>   '¶áµ¦'),
        array('id' => 28, 'name' => 'ʼ¸Ë¸©',   'region' =>   '¶áµ¦'),
        array('id' => 29, 'name' => 'ÆàÎɸ©',   'region' =>   '¶áµ¦'),
        array('id' => 30, 'name' => 'Ï²λ³¸©', 'region' =>   '¶áµ¦'),
        array('id' => 31, 'name' => 'Ä»¼è¸©',   'region' =>   'Ãæ¹ñ'),
        array('id' => 32, 'name' => 'Å纬¸©',   'region' =>   'Ãæ¹ñ'),
        array('id' => 33, 'name' => '²¬»³¸©',   'region' =>   'Ãæ¹ñ'),
        array('id' => 34, 'name' => '¹­Å縩',   'region' =>   'Ãæ¹ñ'),
        array('id' => 35, 'name' => '»³¸ý¸©',   'region' =>   'Ãæ¹ñ'),
        array('id' => 36, 'name' => 'ÆÁÅ縩',   'region' =>   '»Í¹ñ'),
        array('id' => 37, 'name' => '¹áÀ',   'region' =>   '»Í¹ñ'),
        array('id' => 38, 'name' => '°¦É²¸©',   'region' =>   '»Í¹ñ'),
        array('id' => 39, 'name' => '¹âÃθ©',   'region' =>   '»Í¹ñ'),
        array('id' => 40, 'name' => 'Ê¡²¬¸©',   'region' =>   '¶å½£'),
        array('id' => 41, 'name' => 'º´²ì¸©',   'region' =>   '¶å½£'),
        array('id' => 42, 'name' => 'Ĺºê¸©',   'region' =>   '¶å½£'),
        array('id' => 43, 'name' => '·§Ëܸ©',   'region' =>   '¶å½£'),
        array('id' => 44, 'name' => 'Âçʬ¸©',   'region' =>   '¶å½£'),
        array('id' => 45, 'name' => 'µÜºê¸©',   'region' =>   '¶å½£'),
        array('id' => 46, 'name' => '¼¯»ùÅ縩', 'region' =>   '¶å½£'),
        array('id' => 47, 'name' => '²­Æ츩',   'region' =>   '²­Æì'),
    );

    function prefectures()
    {
        return array_map(create_function('$p', 'return $p["name"];'), $this->_prefectures);
    }

    function regions()
    {
        return array_merge(array_unique(array_map(create_function('$p', 'return $p["region"];'), $this->_prefectures)));
    }

    function prefectures_in($region)
    {
        $pref = array_filter($this->_prefectures, create_function('$p', "return (\$p['region'] == '$region');"));
        return array_merge(array_map(create_function('$p', 'return $p["name"];'), $pref));
    }

    function prefectures_id($prefecture)
    {
        foreach ($this->_prefectures as $pref) {
            if ($pref['name'] == $prefecture) {
                return $pref['id'];
            }
        }
    }
}
?>

- »È¤¤Êý

<?php
require_once 'Geography_JapanesePrefectures.php';

$geo = new Geography_JapanesePrefectures;
print_r($geo->prefectures());
// -> array(Ë̳¤Æ», ÀÄ¿¹¸©, ´ä¼ê¸©, ..., ¼¯»ùÅ縩, ²­Æ츩)

print_r($geo->regions());
// -> array(Ë̳¤Æ», ÅìËÌ, ´ØÅì, ..., ¶å½£, ²­Æì)

print_r($geo->prefectures_in('´ØÅì'));
// -> array(°ñ¾ë¸©, ÆÊÌÚ¸©, ·²Çϸ©, ºë¶Ì¸©, ÀéÍÕ¸©, ÅìµþÅÔ, ¿ÀÆàÀ, »³Íü¸©)

print_r($geo->prefectures_id('ÅìµþÅÔ'));
// -> 13
?>

  »³Íü¸©¤Ï´ØÅì¤Ê¤Î¤«¤È¤«¡¤»°½Å¸©¤ÏÅ쳤¤Ê¤Î¤«¤À¤È¤«¤³¤ÎÊÕ¤ê¤Ï¤¤¤í¤¤¤í¤¢¤ë¤é¤·¤¤¤±¤É¡¤¥ª¥ê¥¸¥Ê¥ë¤Ë¹ç¤ï¤»¤Æ¤¢¤ê¤Þ¤¹¡¥
  Á´ÂÎŪ¤Ë create_function() »È¤¤¤¹¤®¤Æ¥­¥â¥¤¤³¤È¤Ë¤Ê¤Ã¤Æ¤¤¤Þ¤¬¡¤¤¢¤Þ¤êµ¤¤Ë¤·¤Ê¤¤¤Ç¤¯¤À¤µ¤¤¡¥
  Æäˡ¤prefectures_in() ¤Î¥­¥â¤µ¤Ï¤É¤¦¤Ë¤«¤·¤¿¤¤¤È¤³¤í¤Ç¤¢¤ê¤Þ¤¹¡¥

- Geography::JapanesePrefectures
  http://search.cpan.org/~tokuhirom/Geography-JapanesePrefectures/lib/Geogra ...

- via: ¥ª¥ì¥ó¥¸¥Ë¥å¡¼¥¹
  http://secure.ddo.jp/~kaku/tdiary/20060915.html#p09