diff options
author | lookshe <lookshe@lookshe-laptop.(none)> | 2014-09-21 00:39:52 +0200 |
---|---|---|
committer | lookshe <lookshe@lookshe-laptop.(none)> | 2014-09-21 00:39:52 +0200 |
commit | 61672bf575c84e1f3b313fe9ea2dd4de75b601ae (patch) | |
tree | e42d542afd5de8ead38bdc42a002fe0c336b6b75 /externalIp.pl | |
parent | 404e0e28825c805b54d129f8b9d7c5690a27ef17 (diff) | |
parent | 9dd1e786b135cbf333e861f790eb53091904a607 (diff) |
Merge branch 'master' of github.com:lookshe/scripts
Diffstat (limited to 'externalIp.pl')
-rw-r--r-- | externalIp.pl | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/externalIp.pl b/externalIp.pl new file mode 100644 index 0000000..2220d9d --- /dev/null +++ b/externalIp.pl @@ -0,0 +1,6 @@ +#!/usr/bin/perl + +($ip=`wget -q -O - http://checkip.dyndns.org`)=~s/\n$//; +$ip=~s/.*[^\d](\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3})[^\d].*/$1/; +($date=`date`)=~s/\n$//; +print "$date\n$ip\n"; |