hotsanic

Subversion Repositories:

[/] [trunk/] [modules/] [wireless-nec/] [platform/] [common.pm] - Rev 36 Go to most recent revision

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"}=$value;
                }
        }
        return %MODARGS;
}
1;