hotsanic |
Subversion Repositories: |
Compare with Previous - Blame - Download
package HotSaNICmod::common;
sub configure {
my $num=0;
foreach (@_) {
($var,$value)=HotSaNICparser::parse_line($_);
if ($var eq "SNMPWALK") { $MODARGS{SNMPWALK}=$value; }
if ($var eq "IP") {
my ($dev,$oid,$name)=split(/,/,$value);
$MODARGS{"IP,$dev,$oid,$name"}=$name;
}
}
return %MODARGS;
}
1;