From 2c625018a15e628f82e91126eb544d7af4dd5088 Mon Sep 17 00:00:00 2001
From: Joachim Tingvold <joachim@tingvold.com>
Date: Wed, 2 Mar 2016 23:41:57 +0100
Subject: Cleaned up some.

---
 web/streamlib/stream.pm | 36 ------------------------------------
 1 file changed, 36 deletions(-)
 delete mode 100644 web/streamlib/stream.pm

(limited to 'web/streamlib/stream.pm')

diff --git a/web/streamlib/stream.pm b/web/streamlib/stream.pm
deleted file mode 100644
index c28136e..0000000
--- a/web/streamlib/stream.pm
+++ /dev/null
@@ -1,36 +0,0 @@
-package stream;
-use strict;
-use warnings;
-
-BEGIN {
-	use Exporter();
-
-        our ($VERSION, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS);
-
-        @ISA         = qw(Exporter);
-	$VERSION     = 1.00;
-	@EXPORT      = qw(&is_ip_local);
-	
-}
-
-sub is_ip_local($$$) {
-	my $clip = shift;
-	my $v4net = shift;
-	my $v6net = shift;
-	return 0 unless defined($clip);
-	
-	my $is_local = 0;
-	if ($clip =~ m/\:/){
-		if (NetAddr::IP->new($clip)->within($v6net)){
-			$is_local = 1;
-		}
-	} else {
-		if (NetAddr::IP->new($clip)->within($v4net)){
-			$is_local = 1;
-		}
-	}
-	return $is_local;
-}
-
-
-1;
-- 
cgit v1.2.3