2nd fix for ePN

[nagiosplug.git] / plugins-scripts / check_netdns.pl

diff --git a/plugins-scripts/check_netdns.pl b/plugins-scripts/check_netdns.pl
index 65ad7beb1aa774d521e371a65fea44382c322a65..6872b9320a813215f1d541b9bf3d0c94652a616f 100755 (executable)
--- a/plugins-scripts/check_netdns.pl
+++ b/plugins-scripts/check_netdns.pl
@@ -6,6 +6,9 @@
 # Copyright 2000, virCIO, LLP
 #
 # $Log$
+# Revision 1.3  2002/05/07 05:35:49  sghosh
+# 2nd fix for ePN
+#
 # Revision 1.2  2002/05/02 16:43:29  sghosh
 # fix for embedded perl
 #
@@ -25,10 +28,11 @@
 
 use Getopt::Long;
 use Net::DNS;
-use Findbin;
-use lib "$FindBin::Bin";
+use lib utils.pm;
 use utils ;
 
+my $PROGNAME = "check_netdns";
+
 Getopt::Long::Configure(`bundling`);
 GetOptions("V" => $opt_V,         "version" => $opt_V,
                                         "h" => $opt_h,         "help" => $opt_h,