̾��

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;

DESCRIPTION

CONSTRUCTOR

create_coord

�а��٤���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���֤��ޤ���

create_iarea

���ꥢ�����ɤ���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���֤��ޤ���

°��

id

areaid

sub_areaid

���줾�졢5���Υ��ꥢ�����ɡ�3���οƥ����ɡ�2���λҥ����ɤ��֤��ޤ���

name

prefecture

region

���줾�줳�Υ��ꥢ�Υ��ꥢ̾����ƻ�ܸ�̾������̾���֤��ޤ��� ����EUC-JP�����ɤǤ��ͤ��֤��ޤ���

�᥽�å�

include_area

�а��٤����ꤷ�������������ߤΥ��ꥢ�˴ޤޤ��뤫�������å����ޤ���

  ����ˡ:
    $is_include = $obj->include_area($lat,$lon,$datum,$format);
    # or
    $is_include = $obj->include_area($point);

  ������:
    $is_include : �ޤޤ��Ƥ�����1�����ʤ�����0���֤��ޤ���

  ��:�а��٤���i���ꥢ���֥������ȤϺ����Ǥ����Τǡ����ޤ���̣�Ϥʤ�����
     �����ޤ��󤬡�i���ꥢ���֥������Ȥϼ��ȤΥ��å����򥭥��å��夷�Ƥ���
     �Τǡ������ꥢ�Υ��å��������ʤ᤹�������ϼ㴳�ᤤ���ȡ�

get_aura

���ꥢ�γ��ܻ��շ�(������)�Υ��֥�������-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);

get_center

���ܻ��շ����濴���������ޤ���

  ����ˡ:
    $cpoint = $obj->get_center;

  ������:
    Location::GeoTool���֥������Ȥ��֤����ᡢ�а��٤������ˤϰʲ��Τ褦��
    ���Ȥʤ��ޤ���
   ($clat,$clong) = $cpoint->datum_wgs84->format_degree->array;

get_nextarea

  ���Υ��ꥢ�����ܤ��륨�ꥢ�Ρ�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:

Around line 1:

Non-ASCII character seen before =encoding in '̾��'. Assuming UTF-8