package HotSaNICmod::common; sub version { ($VERSION = '$Revision: 1.2 $') =~ s/.*(\d+\.\d+).*/$1/; return "common.pm $VERSION"; } sub configure { my $num = 0; foreach (@_) { ($var,$value)=HotSaNICparser::parse_line($_); if ($var eq "SENSOR") { $num++; $MODARGS{"SENSOR$num"}=$value; } } return %MODARGS } 1;
hotsanic |
Subversion Repositories: |
Line No. | Rev | Author | Line |
---|