1 files changed, 0 insertions, 16 deletions
diff --git a/bin/get_ip b/bin/get_ip
deleted file mode 100755
index 879e0cd..0000000
--- a/bin/get_ip
+++ /dev/null
@@ -1,16 +0,0 @@
-#!/usr/bin/perl
-
-my $page = "http://www.lawrencegoetz.com/programs/ipinfo/";
-
-open my $site, "wget -qO- $page|" or die "Could not get web page";
-
-my $next_line_is_ip = 0;
-while (<$site>) {
-    s/[\r\n]+$//;
-    if ($next_line_is_ip == 1) {
-        s/ //g;
-        print $_, "\n";
-        last;
-    }
-    $next_line_is_ip = 1 if /Your IP address is/;
-}