Cara mengonversi IP ke lokasi negara menggunakan perl dan geoipfree

Konfigurasi ini akan memberi Anda skrip perl sederhana yang dapat digunakan untuk mencari nama negara dari alamat IP. Pertama kita perlu menginstal libgeo-iPfree-Perl Perpustakaan Perl:

Ubuntu/debian # apt-get install libgeo-ipfree-perl 

Selanjutnya, buat skrip misalnya. ip2location.pl dengan kode berikut:

#!/USR/BIN/Env Perl Gunakan geo :: ipfree; $ geo = geo :: ipfree-> baru; My ($ code, $ country) = $ geo-> lookup ($ argv [0]); Cetak "Negara: $ Country \ n" . "Kode Negara: $ Code \ n" 

Membuat skrip dapat dieksekusi:

$ chmod +x ip2location.pl 

Kita ip2location.pl Skrip menerima argumen baris perintah tunggal dan itu adalah alamat IP yang ingin kami konversi/mencari ke nama negara. Misalnya kami menjalankan skrip dengan argumen 213.213.65.125:

./ip2location.PL 213.213.65.125 Negara: Kode Negara Italia: IT 

Script di atas dapat digunakan sebagai alat baris perintah sederhana untuk mengonversi alamat IP ke lokasi negara atau juga dapat digunakan misalnya untuk menganalisis apache mengakses.catatan dan mengonversi semua alamat IP di dalam ke lokasi negara:

$ for i in $ (AWK 'print $ 1' Access.log | urutkan | uniq); do Perl ip2location.pl $ i; Selesai 

Selanjutnya, Perl Geo :: ipfree Perpustakaan juga dapat digunakan untuk mencari nama host:

$ ./ip2location.PL GNU.Negara Org: Kode Contry Amerika Serikat: AS 

Tutorial Linux Terkait:

• Cara Membangun Aplikasi Tkinter Menggunakan Objek Berorientasi…
• Ekspresi reguler Python dengan contoh
• Lanjutan regex bash canggih dengan contoh
• Instal Arch Linux di VMware Workstation
• Tutorial debugging GDB untuk pemula
• Bagaimana bekerja dengan WooCommerce Rest API dengan Python
• Cara mengelola repositori git dengan python
• Loop bash dengan contoh
• Cara Terhubung ke Server FTP Menggunakan Python
• Cara Mengatur Server OpenVPN di Ubuntu 20.04