Geo::WebService::OpenCellID::measure - Perl API for the opencellid.org database


Geo-WebService-OpenCellID documentation Contained in the Geo-WebService-OpenCellID distribution.

Index


Code Index:

NAME

Top

Geo::WebService::OpenCellID::measure - Perl API for the opencellid.org database

SYNOPSIS

Top

  use Geo::WebService::OpenCellID;
  my $gwo=Geo::WebService::OpenCellID->new(key=>$apikey);
  my $point=$gwo->measure->get(mcc=>$country,
                            mnc=>$network,
                            lac=>$locale,
                            cellid=>$cellid);
  printf "Lat:%s, Lon:%s\n", $point->latlon;

DESCRIPTION

Top

Perl Interface to the database at http://www.opencellid.org/

USAGE

Top

METHODS

Top

add

Returns a response object Geo::WebService::OpenCellID::Response::measure::add.

  my $response=$gwo->cell->add(key=>$myapikey,
                               lat=>$lat,
                               lon=>$lon,
                               mnc=>$mnc,
                               mcc=>$mcc,
                               lac=>$lac,
                               cellid=>$cellid,
                               measured_at=>$dt, #time format is not well defined
                                                 #use is optional
                                                 #suggest W3C e.g. 2009-02-28T07:25Z
                              );

  <?xml version="1.0" encoding="UTF-8" ?> 
  <rsp cellid="126694" id="6121024" stat="ok">
    <res>Measure added, id:6121024</res> 
  </rsp>

BUGS

Top

Submit to RT and email the Author

SUPPORT

Top

Try the Author or Try 8motions.com

AUTHOR

Top

    Michael R. Davis
    CPAN ID: MRDVT
    STOP, LLC
    domain=>michaelrdavis,tld=>com,account=>perl
    http://www.stopllc.com/

COPYRIGHT

Top

SEE ALSO

Top


Geo-WebService-OpenCellID documentation Contained in the Geo-WebService-OpenCellID distribution.
package Geo::WebService::OpenCellID::measure;
use warnings;
use strict;
use base qw{Geo::WebService::OpenCellID::Base};
use Geo::WebService::OpenCellID::Response::measure::add;
our $VERSION = '0.03';

sub add {
  my $self=shift;
  return $self->parent->call("measure/add",
                             "Geo::WebService::OpenCellID::Response::measure::add",
                             @_);
}

1;