[Netpass-devel] NetPass/bin/test formatPorts.pl,NONE,1.1

[jeff m. <jef...@us...>]

Update of /cvsroot/netpass/NetPass/bin/test
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv20551/bin/test

Added Files:
	formatPorts.pl 
Log Message:
bug fixes, switch config, snort stuff

--- NEW FILE: formatPorts.pl ---
#!/opt/perl/bin/perl -w

use strict;
use lib '/opt/netpass/lib';
use NetPass::Config;

my $h = {
	 '12/812' => [ 1,2,3,10,11,12,20 ],
	 '13/813' => [ 4,5,6,24,28,29,30 ]
	 };

print NetPass::Config::formatPorts($h), "\n";

exit 0;