just use sys/socket.ph

diff --git a/scripts/tcp-banger.pl b/scripts/tcp-banger.pl
index 3cbebf33f338e1a6eaf00b40146e82b94ff2cd5d..34e22b1758fa3a233c376ee416154de0da1fa59f 100755 (executable)
--- a/scripts/tcp-banger.pl
+++ b/scripts/tcp-banger.pl
@@ -18,7 +18,7 @@ $|=1;
 $host=(shift || 'localhost') ;
 $port=(shift || '3128') ;
 
-require "$ENV{'HARVEST_HOME'}/lib/socket.ph";
+require 'sys/socket.ph';
 
 $sockaddr = 'S n a4 x8';
 ($name, $aliases, $proto) = getprotobyname("tcp");