#!/usr/bin/perl use strict; use Getopt::Std; use IO::Socket; use Net::SNMP; --------------------- my $remote = $opt_t; my $community = $opt_c || "public"; my $port = $opt_p || 161; my $snmpver = $opt_v || 1; my $retries = $opt_r || 2; my $timeout = $opt_T || 40; my $timeout = $opt_T || 40;
In reply to Perl Socket time out too small by h3x
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |