Skrip Perl untuk mengambil alamat IP eksternal

Skrip Perl untuk mengambil alamat IP eksternal

Skrip Perl sederhana ini akan mencetak alamat IP eksternal Anda yang ditetapkan oleh penyedia internet Anda (bagus untuk seseorang dengan alamat IP dinamis).

Pertama, kami mengunduh file html dari ipchicken.com dan kemudian frase file ini agar cocok untuk alamat IP dalam format x.X.X.X Menggunakan Ekspresi Reguler.

Selanjutnya, skrip menghapus semua karakter yang tidak perlu dan mencetak alamat IP eksternal Anda di terminal. Terakhir, skrip menghapus indeks yang diunduh sebelumnya.file html.

Get-External-ip.PL:

#!/usr/bin/perl # dapatkan file html dengan sistem alamat ip eksternal ("wget ​​-q http: // ipchicken.com "); buka (file, ' 

Tutorial Linux Terkait:

  • Lanjutan regex bash canggih dengan contoh
  • Cara membandingkan file menggunakan diff
  • Cara memasang gambar iso di linux
  • File Konfigurasi Linux: 30 Teratas Paling Penting
  • Menguasai loop skrip bash
  • Ekspresi reguler Python dengan contoh
  • Hal -hal yang harus dilakukan setelah menginstal ubuntu 20.04 FOSSA FOSSA Linux
  • Cara Mengatur Server OpenVPN di Ubuntu 20.04
  • Pengantar Otomatisasi Linux, Alat dan Teknik
  • Xargs multi-threaded dengan contoh