#!/usr/local/bin/perl

print "Making Recommended Logging Changes\n";

#chdir "/opt/tivoli/itcam/was/DC/";
@logging=`find . -name cynlogging.properties`;
chomp @logging;
print @logging;
foreach $prop (@logging) {
open (FILE,"<$prop");
@array=<FILE>;
close(FILE);
foreach (@array) {
print @array;
$_ =~ s/DEBUG_MIN/WARN/g; }
}


#######

print "Disable Aspect J And Enable BCI\n";

chdir "/opt/tivoli/itcam/was/DC/runtime/";
@disable='find . -name toolkit_custom.properties';

foreach $props (@disable) {
open (FILE, ">> $props");
@array1=<FILE>;

foreach (@array1) {
print FILE "am.camtoolkit.gpe.bci.allow.new.fields=true\n";
print FILE "com.ibm.tivoli.itcam.toolkit.ai.createRemeberedObjectField=true";

$_ =~ s/#am.comtoolkit.gpe.probifier.factory=com.ibm.tivoli.itcam.toolkit.ai.bci.engine.BCIEngineProbifierFactory/am.comtoolkit.gpe.probifier.factory=com.ibm.tivoli.itcam.toolkit.ai.bci.engine.BCIEngineProbifierFactory/; }
close(FILE);
}

#######

print "Recycle Configured JVM's\n";

exit 0;