jablonka.czprosek.czf

hotsanic

Subversion Repositories:
[/] [trunk/] [modules/] [wireless-sd/] [platform/] [common.pm] - Rev 35

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;

Powered by WebSVN 2.2.1