swg-source/SWG_Client_Next_Main
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

initial commit

Browse Source
This commit is contained in:
lightlordmh
2016-06-01 15:00:39 -04:00
parent 38ee75deb2
commit 0e9323e975
25881 changed files with 7081461 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
tools/configFileBuilder.pl
+18
View File
@@ -0,0 +1,18 @@
while (<>)
{
next if (s/^cfg: // == 0);
chomp;
($section, $value) = /\[(.*)\] (.*)/;
$key{$section . "." . $value} = 1;
}
foreach (sort keys %key)
{
($section, $value) = split(/\./, $_, 2);
if ($section ne $oldSection)
{
$oldSection = $section;
print "[", $section, "]\n";
}
print "\t", $value, "\n";
}