apt-get install -y libgeo-ip-perl
Вызываем из кода:
perl -e 'use Geo::IP; my $gi = Geo::IP->open("/usr/share/GeoIP/GeoIP.dat", GEOIP_STANDARD); print $gi->country_code_by_addr("81.21.yy.xx");'
В ответ скриптом будет выдан
apt-get install -y libgeo-ip-perl
perl -e 'use Geo::IP; my $gi = Geo::IP->open("/usr/share/GeoIP/GeoIP.dat", GEOIP_STANDARD); print $gi->country_code_by_addr("81.21.yy.xx");'
No comments :
Post a Comment
Note: only a member of this blog may post a comment.