Perl -Skript zum Abrufen einer externen IP -Adresse

In diesem einfachen Perl -Skript wird Ihre externe IP -Adresse gedruckt, die von Ihrem Internetanbieter zugewiesen wird (ideal für jemanden mit dynamischer IP -Adresse).

Zunächst laden wir eine HTML -Datei von ipchicken herunter.com und dann diese Datei so formulieren, dass die IP -Adresse in Format x übereinstimmt.X.X.X unter Verwendung des regulären Ausdrucks.

Als nächstes entfernt das Skript alle unnötigen Zeichen und druckt Ihre externe IP -Adresse auf dem Terminal. Zuletzt entfernt das Skript den zuvor heruntergeladenen Index.HTML -Datei.

Get-external-ip.PL:

#!/usr/bin/perl # HTML -Datei mit einem externen IP -Adresssystem abrufen ("WGet -q http: // ipchicken.com "); öffnen (Datei, ' 
Verwandte Linux -Tutorials:
Advanced Bash Regex mit Beispielen
So vergleichen Sie Dateien mithilfe von Diff
So montieren Sie das ISO -Bild unter Linux
Linux -Konfigurationsdateien: Top 30 am wichtigsten
Mastering -Bash -Skriptschleifen beherrschen
Python reguläre Ausdrücke mit Beispielen
Dinge zu tun nach der Installation Ubuntu 20.04 fokale Fossa Linux
So richten Sie einen OpenVPN -Server auf Ubuntu 20 ein.04
Eine Einführung in Linux -Automatisierung, Tools und Techniken
Multi-Thread-Xargs mit Beispielen