- Update to rrdtool 1.2 syntax [1], fixes [2] - Substitute absolute paths PR: ports/98369 [1], ports/103724 [2] Submitted by: vax@satx.rr.com [1], Rodrigo Graeff <delphus@gmail.com> [2]
28 lines
887 B
Perl
28 lines
887 B
Perl
--- ./find-if.pl.orig Sat Jan 3 23:44:21 2004
|
|
+++ ./find-if.pl Mon Oct 9 13:49:17 2006
|
|
@@ -1,4 +1,4 @@
|
|
-#!/usr/bin/perl -w
|
|
+#!%%PERL%% -w
|
|
#ifGraph 0.4.10 - Network Interface Data to RRD
|
|
#Copyright (C) 2001-200333 Ricardo Sartori
|
|
#
|
|
@@ -19,10 +19,6 @@
|
|
#Sugestoes e criticas (sem flames!!) mailto:sartori@lrv.ufsc.br
|
|
#Visite: http://ifgraph.lrv.ufsc.br
|
|
|
|
-# Let's find out where we are
|
|
-use FindBin;
|
|
-# # Found, now we add it to the @INC
|
|
-use lib "$FindBin::Bin/lib";
|
|
# # We are strict
|
|
use strict;
|
|
# # Get the command line options
|
|
@@ -30,7 +26,7 @@
|
|
getopts('adhims');
|
|
|
|
# We just nedd the basic features here
|
|
-use Net::SNMP_365;
|
|
+use Net::SNMP;
|
|
|
|
use vars qw($response $response2 $response3 $response4 $response5 $response6 $response7 $response8 $response9
|
|
$response10 $response11 $response12 $opt_d @ips $ip $mac $opt_a $opt_h $opt_m $opt_i $opt_s $if $desc $stat $ocin
|