Location::Area::DoCoMo::iArea - ·Ð°ÞÅÙËô¤Ï¥³¡¼¥ÉÈֹ椫¤éNTT DoCoMo¤Îi¥¨¥ê¥¢¥ª¥Ö¥¸¥§¥¯¥È¤òµá¤á¤ë
use Location::Area::DoCoMo::iArea; # ¤â¤·Ì·½â¤ò²ò¾Ã¤·¤¿³°ÀܷаÞÅ٥ǡ¼¥¿¤òÍѤ¤¤¿¤¤¤Ê¤é¤Ð use Location::Area::DoCoMo::iArea qw(useAdjustedAura); #¥ª¥Ö¥¸¥§¥¯¥ÈÀ¸À® # ·Ð°ÞÅÙ¤«¤é¥ª¥Ö¥¸¥§¥¯¥ÈÀ¸À® $oiArea = Location::Area::DoCoMo::iArea->create_coord("34/20/39.933","135/21/51.826","tokyo","mapion"); # or $oiArea = Location::Area::DoCoMo::iArea->create_coord("342039.933","1352151.826","wgs84","dmsn"); # ¥¨¥ê¥¢¥³¡¼¥É¤«¤é¥ª¥Ö¥¸¥§¥¯¥ÈÀ¸À® $oiArea = Location::Area::DoCoMo::iArea->create_iarea("152","00"); # or same $oiArea = Location::Area::DoCoMo::iArea->create_iarea("15200"); #¥Ç¡¼¥¿¼èÆÀ # 5·å¤Î¥¨¥ê¥¢¥³¡¼¥É¼èÆÀ my $fid = $oiArea->id(); # 3·å¤Î¿Æ¥³¡¼¥É¼èÆÀ my $pid = $oiArea->areaid(); # 2·å¤Î²¼¥³¡¼¥É¼èÆÀ my $sid = $oiArea->sub_areaid(); # EUC-JP¤Ç¥¨¥ê¥¢Ì¾¤òÆÀ¤ë my $name = $oiArea->name(); # EUC-JP¤ÇÅÔÆ»Éܸ©Ì¾¤òÆÀ¤ë my $pref = $oiArea->prefecture(); # EUC-JP¤ÇÃÏÊý̾¤òÆÀ¤ë my $reg = $oiArea->region(); # ¥¨¥ê¥¢¤Î³°ÀÜ»ÍÊÕ·Á(¥ª¡¼¥é)¤Î¥ª¥Ö¥¸¥§¥¯¥È(Location::GeoTool::Aura)¤òÆÀ¤ë my $oAura = $oiArea->get_aura; # ¥ª¡¼¥é¤ÎÅìÀ¾ÆîË̤λÍÊÕ¤òÆÀ¤ë(À¤³¦Â¬ÃÏ·Ï¡¢GPSONE¥Õ¥©¡¼¥Þ¥Ã¥È) my ($slim,$wlim,$nlim,$elim) = $oAura->datum_wgs84->format_gpsone->array; # ¤â¤·¤¯¤Ï(ÆüËܬÃÏ·Ï¡¢ÅÙñ°Ì) my ($slim,$wlim,$nlim,$elim) = $oAura->datum_tokyo->format_degree->array; # ¥ª¡¼¥é¤ÎÃæ¿´ÅÀ¥ª¥Ö¥¸¥§¥¯¥È(Location::GeoTool)¤òÆÀ¤ë my ($clat,$clong) = $oiArea->get_center->array;
·Ð°ÞÅÙ¤«¤éLocation::Area::DoCoMo::iArea¥ª¥Ö¥¸¥§¥¯¥È¤òÀ¸À®¤¹¤ë¡£
ÍøÍÑË¡: $obj = Location::Area::DoCoMo::iArea->create_coord($lat,$lon,$datum,$format); °ú¿ô: $lat : °ÞÅÙ (Ë̤¬Àµ). $lon : ·ÐÅÙ (Å줬Àµ). $datum : ·Ð°ÞÅ٤άÃϷϤòÆÃÄê¡£ (Location::GeoTool¤Îʸ»úÎó¤ò»ÈÍÑ) $format: ·Ð°ÞÅ٤Υե©¡¼¥Þ¥Ã¥È¤òÆÃÄê¡£ (Location::GeoTool¤Îʸ»úÎó¤ò»ÈÍÑ) ¤â¤·¤¯¤Ï¡¢ ÍøÍÑË¡: $obj = Location::Area::DoCoMo::iArea->create_coord($point); °ú¿ô:: $point : Location::GeoTool¥ª¥Ö¥¸¥§¥¯¥È Ìá¤êÃÍ: $obj : Location::Area::DoCoMo::iArea¥ª¥Ö¥¸¥§¥¯¥È¤òÊÖ¤·¤Þ¤¹¡£ ·Ð°ÞÅ٤Υ¨¥ê¥¢¤Ø¤Î·ë¤Ó¤Ä¤±¤¬¼ºÇÔ¤·¤¿¾ì¹ç¡¢undef¤òÊÖ¤·¤Þ¤¹¡£
¥¨¥ê¥¢¥³¡¼¥É¤«¤éLocation::Area::DoCoMo::iArea¥ª¥Ö¥¸¥§¥¯¥È¤òÀ¸À®¤¹¤ë¡£
ÍøÍÑË¡: $obj = Location::Area::DoCoMo::iArea->create_iarea($id,$sid); °ú¿ô: $id : 5·å¤Î¥¨¥ê¥¢¥³¡¼¥É¤â¤·¤¯¤Ï3·å¤Î¿Æ¥³¡¼¥É¤òÀßÄê¡£ $sid : 2·å¤Î»Ò¥³¡¼¥É¤òÀßÄê($id¤Ë¿Æ¥³¡¼¥É¤ò»ØÄꤷ¤¿¾ì¹ç¤Ïɬ¿Ü)¡£ Ìá¤êÃÍ: $obj : Location::Area::DoCoMo::iArea¥ª¥Ö¥¸¥§¥¯¥È¤òÊÖ¤·¤Þ¤¹¡£ ¥¨¥ê¥¢¥³¡¼¥É¤Î¥¨¥ê¥¢¤Ø¤Î·ë¤Ó¤Ä¤±¤¬¼ºÇÔ¤·¤¿¾ì¹ç¡¢undef¤òÊÖ¤·¤Þ¤¹¡£
¤½¤ì¤¾¤ì¡¢5·å¤Î¥¨¥ê¥¢¥³¡¼¥É¡¢3·å¤Î¿Æ¥³¡¼¥É¡¢2·å¤Î»Ò¥³¡¼¥É¤òÊÖ¤·¤Þ¤¹¡£
¤½¤ì¤¾¤ì¤³¤Î¥¨¥ê¥¢¤Î¥¨¥ê¥¢Ì¾¡¢ÅÔÆ»Éܸ©Ì¾¡¢ÃÏÊý̾¤òÊÖ¤·¤Þ¤¹¡£ Á´¤ÆEUC-JP¥³¡¼¥É¤Ç¤ÎÃͤòÊÖ¤·¤Þ¤¹¡£
·Ð°ÞÅÙ¤ò»ØÄꤷ¡¢¤½¤ÎÅÀ¤¬¸½ºß¤Î¥¨¥ê¥¢¤Ë´Þ¤Þ¤ì¤ë¤«¤ò¥Á¥§¥Ã¥¯¤·¤Þ¤¹¡£
ÍøÍÑË¡: $is_include = $obj->include_area($lat,$lon,$datum,$format); # or $is_include = $obj->include_area($point); Ìá¤êÃÍ: $is_include : ´Þ¤Þ¤ì¤Æ¤¤¤ì¤Ð1¡¢¤¤¤Ê¤±¤ì¤Ð0¤òÊÖ¤·¤Þ¤¹¡£ ¢¨:·Ð°ÞÅÙ¤«¤éi¥¨¥ê¥¢¥ª¥Ö¥¸¥§¥¯¥È¤ÏºîÀ®¤Ç¤¤ë¤Î¤Ç¡¢¤¢¤Þ¤ê°ÕÌ£¤Ï¤Ê¤¤¤«¤â ¤·¤ì¤Þ¤»¤ó¤¬¡¢i¥¨¥ê¥¢¥ª¥Ö¥¸¥§¥¯¥È¤Ï¼«¿È¤Î¥á¥Ã¥·¥å¤ò¥¥ã¥Ã¥·¥å¤·¤Æ¤¤¤ë ¤Î¤Ç¡¢Á´¥¨¥ê¥¢¤Î¥á¥Ã¥·¥å¤òÁí¤Ê¤á¤¹¤ë¤è¤ê¤Ï¼ã´³Áᤤ¤«¤È¡£
¥¨¥ê¥¢¤Î³°ÀÜ»ÍÊÕ·Á(¥ª¡¼¥é)¤Î¥ª¥Ö¥¸¥§¥¯¥È-Location::GeoTool::Aura-¤òÊÖ¤·¤Þ¤¹¡£
ÍøÍÑË¡: $oAura = $obj->get_aura;
Location::GeoTool::Aura¥ª¥Ö¥¸¥§¥¯¥È¤Ï°Ê²¼¤Î¤è¤¦¤Ë»È¤Ã¤Æ¤¯¤À¤µ¤¤¡£
#¬ÃÏ·Ï¡¦¥Õ¥©¡¼¥Þ¥Ã¥È¤ÎÆÃÄê: $oAura->datum_wgs84->format_degree... È÷¤¨¤ë¥á¥½¥Ã¥É¤Î̾Á°¡¦¿ô¤ÏLocation::GeoTool¤Ë°ìÃפ·¤Þ¤¹¡£ #³°ÀÜ»ÍÊÕ·Á¤Î·Ð°ÞÅÙ¤ò¼èÆÀ¤·¤Þ¤¹: ($sbound,$wbound,$nbound,$ebound) = $oAura->......->array; Ãí°Õ: NTT¥É¥³¥â¤Î³°ÀܷаÞÅ٥ǡ¼¥¿¤Ï¿¤¯¤ÎÌ·½â¤ò´Þ¤ó¤Ç¤¤¤Þ¤¹¡£ ³µÎ¬¤È¤·¤Æ¼¨¤µ¤ì¤Æ¤¤¤ë³°ÀܷаÞÅ٤ȡ¢¥á¥Ã¥·¥åÁ´¤Æ¤«¤é¼ÂºÝ¤Ëµá¤á¤¿ ³°ÀܷаÞÅÙ¤¬¡¢°ìÃפ·¤Ê¤¤¥¨¥ê¥¢¤¬¿ô³äÄøÅÙ´Þ¤Þ¤ì¤Æ¤¤¤Þ¤¹¡£ ¤½¤Î¤¿¤áËܥ⥸¥å¡¼¥ë¤Ç¤Ï¡¢¥á¥Ã¥·¥å¤«¤é·×»»¤·¤¿Ì·½â¤Î¤Ê¤¤³°ÀÜ»ÍÊÕ·Á ¥Ç¡¼¥¿¤òºîÀ®¤·¡¢Æ±º¤·¤Æ¤ª¤ê¤Þ¤¹¡£ ¤¿¤À¤·¡¢Ä㤤³ÎΨ(¤È¿®¤¸¤Æ¤¤¤Þ¤¹:))¤Ê¤¬¤éËܥ⥸¥å¡¼¥ë¤Ç¤Î·Ð°ÞÅÙ·×»»¤¬ ´Ö°ã¤Ã¤Æ¤¤¤¿¤ê¡¢°¿¤¤¤Ï¥¨¥ê¥¢¤ÎÃæ¿´¤òÄ´À°(»Ô³¹ÃϤÎÃæ¿´¤¬¥¨¥ê¥¢¤Îü¤Ë ¤³¤Ê¤¤¤è¤¦¤Ë¤¹¤ë¡¢Åù)¤¹¤ë¤¿¤á¤Ë¤ï¤¶¤È³°ÀÜ»ÍÊÕ·Á¤ò¤º¤é¤·¤Æ¤¤¤ë¡¢Åù¤Î »ö¾ð¤¬¥É¥³¥â¦¤Ë¤¢¤ë¤«¤â¤·¤ì¤Þ¤»¤ó¤Î¤Ç¡¢Ì·½â¤ò¤Ê¤¯¤·¤¿¥Ç¡¼¥¿¤ò¥Ç¥Õ¥© ¥ë¥È¥Ç¡¼¥¿¤È¤¹¤ë»ö¤ÏÈò¤±¤Þ¤·¤¿¡£ ¤â¤·Ì·½â¤ò¤Ê¤¯¤·¤¿¥Ç¡¼¥¿¤òÍѤ¤¤¿¤¤¾ì¹ç¤Ï¡¢¥â¥¸¥å¡¼¥ë¤Î¸Æ¤Ó½Ð¤·»þ¤Ë use Location::Area::DoCoMo::iArea qw(useAdjustedAura);
³°ÀÜ»ÍÊÕ·Á¤ÎÃæ¿´ÅÀ¤òµá¤á¤Þ¤¹¡£
ÍøÍÑË¡: $cpoint = $obj->get_center; Ìá¤êÃÍ: Location::GeoTool¥ª¥Ö¥¸¥§¥¯¥È¤òÊÖ¤¹¤¿¤á¡¢·Ð°ÞÅÙ¤òÆÀ¤ë¤Ë¤Ï°Ê²¼¤Î¤è¤¦¤Ê ·Á¤È¤Ê¤ê¤Þ¤¹¡£ ($clat,$clong) = $cpoint->datum_wgs84->format_degree->array;
¤³¤Î¥¨¥ê¥¢¤ËÎÙÀܤ¹¤ë¥¨¥ê¥¢¤Î¡¢Location::Area::DoCoMo::iArea¥ª¥Ö¥¸¥§¥¯¥È¤Î ¥ê¥¹¥È¤òÊÖ¤·¤Þ¤¹¡£ ÍøÍÑË¡: @next = $obj->get_nextarea; Ìá¤êÃÍ: @next : ¤³¤Î¥¨¥ê¥¢¤ËÎÙÀܤ¹¤ë¥¨¥ê¥¢¤Î¡¢Location::Area::DoCoMo::iArea¥ª¥Ö ¥¸¥§¥¯¥È¤ÎÇÛÎó Ãí°Õ: 1.¸·Ì©¤Ë¡Ö¥á¥Ã¥·¥å¤¬ÎÙÀܤ¹¤ë¡×¥¨¥ê¥¢´Ö¤·¤«Î٤Ȥߤʤµ¤ì¤Ê¤¤¤è¤¦¤Ê¤Î¤Ç¡¢ ¥¨¥ê¥¢´Ö¤Ë³¤¤¬¤¢¤Ã¤¿¾ì¹ç¡¢¤É¤ì¤Û¤É¶á¤¯¤Æ¤âÎÙÀÜ¥¨¥ê¥¢¤È¤Ï¤ß¤Ê¤µ¤ì¤Ê¤¤¤è¤¦ ¤Ç¤¹¡£ 2.¥Ç¡¼¥¿¥½¡¼¥¹¤È¤Ê¤Ã¤Æ¤¤¤ë http://www.nttdocomo.co.jp/p_s/imode/iarea/iareaweb/iarea_contents.html ¤Ç¤ÎÎÙÀܾðÊó¤Ï¡¢ÊÒÊý¸þ¤Ë¤Ê¤Ã¤Æ¤¤¤¿¤êÇѻߤµ¤ì¤¿¥¨¥ê¥¢¤¬´Þ¤Þ¤ì¤Æ¤¤¤¿¤ê¤È Ì·½â¤¬´Þ¤Þ¤ì¤Æ¤¤¤Þ¤¹¡£ Ëܥ⥸¥å¡¼¥ë¤Ç¤Ï¡¢ÊÒÊý¸þÎÙÀܾðÊó¤òÁÐÊý¸þ¤Ë¤·¡¢Çѻߤµ¤ì¤¿¥¨¥ê¥¢¤Î¾ðÊó¤ò ºï½ü¤·¤¿¤ê¤·¤Æ¡¢Ì·½â¤Î¤Ê¤¤ÎÙÀܾðÊó¤Ë¤·¤Æ¤ª¤ê¤Þ¤¹¡£
Carp Location::GeoTool
¤³¤Î¥Ð¡¼¥¸¥ç¥ó¤Ç¤Îi¥¨¥ê¥¢¥Ç¡¼¥¿¤Ï¡¢NTT¥É¥³¥â¤Î2004ǯ3·î29ÆüÇÛÉۤΥǡ¼¥¿¡¢ http://www.nttdocomo.co.jp/p_s/imode/iarea/iareadata040329.lzh. ¤ò¸µ¤Ë¤·¤Æ¤ª¤ê¤Þ¤¹¡£ ¤Þ¤¿¡¢ÎÙÀÜ¥¨¥ê¥¢¤Î¾ðÊó¤Ï¡¢NTT¥É¥³¥â¤ÎWeb¥µ¥¤¥È http://www.nttdocomo.co.jp/p_s/imode/iarea/iareaweb/iarea_contents.html. ¤ò¸µ¤Ë¡¢Ì·½â¤ò²ò¾Ã¤·¤¿Êª¤òÍøÍѤ·¤Æ¤ª¤ê¤Þ¤¹¡£ ¤³¤Î¥â¥¸¥å¡¼¥ë¤Ï¡¢¤³¤³¥®¥³¡ª¥¦¥§¥Ö¥µ¥¤¥È¡¡¡§ http://kokogiko.net/¤Ë¤Æ¥µ¥Ý¡¼¥È ¤¤¤¿¤·¤Þ¤¹¡£
OHTSUKA Ko-hei, <nene@kokogiko.net>
Copyright (C) 2004-2007 by ¤³¤³¥®¥³¡ª, ºÇ¿·¤Î¥Ç¡¼¥¿¤Ø¤Î¥¢¥Ã¥×¥Ç¡¼¥È¤Ï¡¢¥¢¥¤¥Ç¥¢¥Þ¥ó¥º³ô¼°²ñ¼Ò(http://www.ideamans.com/)¤ÎKunihiko Miyanaga»á¤Î¤´¿ÔÎϤˤè¤ê¹Ô¤ï¤ì¤Þ¤·¤¿¡£ ¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤·¤¿¡£
Ëܥ饤¥Ö¥é¥ê¤Ï¥Õ¥ê¡¼¥½¥Õ¥È¤Ç¤¢¤ê¡¢PerlËÜÂΤÈƱ¤¸¾ò·ï¤Ç¤ÎºÆÇÛÉÛ¡¦²þÊѤ¬²Äǽ¤Ç¤¹¡£
1 POD Error
The following errors were encountered while parsing the POD:
Non-ASCII character seen before =encoding in '̾Á°'. Assuming CP1252
To install Location::Area::DoCoMo::iArea, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Location::Area::DoCoMo::iArea
CPAN shell
perl -MCPAN -e shell install Location::Area::DoCoMo::iArea
For more information on module installation, please visit the detailed CPAN module installation guide.