view release on metacpan or  search on metacpan

Lite.pm  view on Meta::CPAN

=head1 SYNOPSIS

  use GIS::Distance::Lite qw(distance);
    
  my $distanceInMeters = distance($lat1, $lon1 => $lat2, $lon2);


=head1 DESCRIPTION

The module provides a method to calculate geographic distances between coordinates in geodetic WGS84 format using the Haversine formula.

It is similar to L<GIS::Distance>, but without the extra bells and whistles and without the additional dependencies. Same great taste, less filling.
It exists for those who cannot, or prefer not to install Moose and its dependencies.


=over 2

=item  my $distanceInMeters = GIS::Distance::Lite::distance($lat1, $lon1 => $lat2, $lon2);

Calculate distance between two set of coordinates.

Lite.pm  view on Meta::CPAN

    return 6371640 * $c
}

1;

=head1 SEE ALSO

Inspired by: L<GIS::Distance>

Haversine formula: http://en.wikipedia.org/wiki/Haversine_formula

=head1 COPYRIGHT

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

=head1 AUTHORS

Author: Johan Beronius <johanb@athega.se>, 2010. http://www.athega.se/

=cut