Help for this page
open(LOG, "+>$logFile") || die "Can't open logfile: ($!)\n"; print LOG "Begin data collection for $host - Runs: $numRuns\n"; ... snmpRun(); unless ($run == $numRuns) { sleep("$pauseTime"); } }
sub snmpRun { ... print LOG "In: $octetInUtil Out: $octetOutUtil Time: $time\n"; ... }