Www :: gazetteer :: heavensabove Encontre localização das cidades do mundo
Baixe Agora

Www :: gazetteer :: heavensabove Classificação e resumo

Www :: gazetteer :: heavensabove Tag

Finder. Módulo Perl. perl localização Localizador de localização

Www :: gazetteer :: heavensabove Descrição

Encontre localização das cidades e cidades do mundo Um gazetteer é um dicionário geográfico (como na parte de trás de um atlas). O módulo Www :: Gazette :: Heavensabove Perl usa as informações athttp: //www.heavens-above.com/countries.asp para devolver a localização geográfica (longitude, latitude, elevação) para cidades em países do mundo. um www :: OBSETETER :: Heavensabove Objects é criado, use o método Localizar () para retornar listas de hashrefs segurando todas as informações para as cidades correspondentes. Uma truce da cidade é assim: $ lesparis = {iso => 'fr' Latitude => '45 .633 ', RegionName =>' Região ', região =>' Rhône-Alpes ', Alias =>' Les Paris ', Elevação =>' 508 ', # medidores Longitude =>' 5.733 ', nome => 'Paris',}; Nota: O atributo 'regioname' é o nome local de uma região (isso pode mudar de país para país). Duas para a maneira como o banco de dados do Heavens-above.com foi criado, as cidades dos EUA são tratadas como um caso especial. O campo da região é o estado, e um campo especial chamado County detém o nome do condado.Aqui é um exemplo de uma cidade americana: $ newyork = {iso => 'nós', latitude => '39 .685 ', regionalmente ', Região =>' Missouri ', condado =>' caldwell ', # Isso é apenas para cidades dos EUA alias =>' '', elevação => '244', longitude => '-93.927', nome => 'nova york '}; Sinopse use www :: gazetteer :: heavensabove; Meu $ Atlas = WWW :: GAZETATER :: Heavensabove-> Novo; # consulta simples usando códigos ISO 3166 meus @towns = $ atlas-> encontrar ('Bacton', 'GB'); Imprimir $ _-> {nome}, ",", $ _-> {elevação}, $ / para @towns; # consulta simples usando heavens-above.com códigos meus @towns = $ atlas-> consulta ('Bacton', 'Reino Unido'); Imprimir $ _-> {nome}, ",", $ _-> {elevação}, $ / para @towns; # Grandes consultas podem usar um retorno de chamada (e retornar nada) $ atlas-> Encontrar ('Bacton', 'GB', Sub {Imprimir $ _-> {NAME}, ", $}, $ / por @_ } ); # Find () retorna um arrayref em contexto escalar $ cidades = $ atlas-> encontrar ('Paris', 'fr'); Imprimir $ cidades -> {NAME}; # O site Heavens-above.com suporta consultas complicadas Meu @az = $ atlas-> encontrar ('a * z', 'fr'); # E você pode usar naturalmente croadings para aqueles! meu ($ c, n); $ atlas-> encontrar ('n *', 'us', sub {$ c ++; $ n + = @_}); Imprimir "$ c solicitações da web necessárias para encontrar $ n cidades"; # ou use seu próprio userAgent meu $ UA = lwp :: useragent-> novo; $ atlas = www :: gazetteer :: heavensabove-> novo (ua => $ ua); # Outra maneira de criar um novo objeto Use WWW :: Gazeterer; meu $ g = www :: gazetteer-> novo ('heavensabove'); Requisitos: · Perl.

Www :: gazetteer :: heavensabove Software Relacionado