Discussion :

[Pinoute]

Bonjour,

je cherche à obtenir la latitude et la longitude d'un lieu à partir de son adresse géographique. Je suis donc allée sur CPAN et j'ai installé le module Geo::Google qui est censer répondre parfaitement à ma question! Le problème est que même l'exemple donné sous CPAN (voir ci-dessous) plante.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 
  use strict;
  use Data::Dumper;
  use Geo::Google;
 
  #Allen's office
  my $gonda_addr = '695 Charles E Young Dr S, Los Angeles, Los Angeles, California 90024, United States';
  #Stan's Donuts
  my $stans_addr = '10948 Weyburn Ave, Westwood, CA 90024';
  #Roscoe's House of Chicken and Waffles
  my $roscoes_addr = "5006 W Pico Blvd, Los Angeles, CA 90019";
 
  #Instantiate a new Geo::Google object.
  my $geo = Geo::Google->new();
 
  #Create Geo::Google::Location objects.  These contain
  #latitude/longitude coordinates, along with a few other details
  #about the locus.
  my ( $gonda ) = $geo->location( address => $gonda_addr );
  my ( $stans ) = $geo->location( address => $stans_addr );
  my ( $roscoes ) = $geo->location( address => $roscoes_addr );
  print $gonda->latitude, " / ", $gonda->longitude, "\n";
  print $stans->latitude, " / ", $stans->longitude, "\n";
  print $roscoes->latitude, " / ", $roscoes->longitude, "\n";

En fait, il semblerait que ce soit la méthode location qui pose problème parce qu'elle ne renvoit rien. Du coup, ça me met le message :

Can't call method "latitude" on an undefined value at essai_0201.pl line 17.

Je tourne le problème dans tous les sens mais il y a un truc qui m'échappe...

Un grand merci à la personne qui peut éclairer ma lanterne!

Bonne soirée

[Pinoute]

J'ai contourné le problème autrement. J'utilise le module Geo::Coder au lieu de Geo::Google.
Il y a encore des adresses pour lesquelles le module ne trouve pas la latitude et la longitude mais il y a du mieux!

Bonne journée à tous