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 "DEV") { $num++; $MODARGS{"DEV$num"}=$value; } } return %MODARGS } 1; WebSVN - hotsanic - Blame - Rev 10 - /branches/HotSaNIC-0.5.0-jablonecka/modules/traffic/platform/common.pm

hotsanic

Subversion Repositories:

[/] [branches/] [HotSaNIC-0.5.0-jablonecka/] [modules/] [traffic/] [platform/] [common.pm] - Blame information for rev 10

Line No.	Rev	Author	Line