#!/usr/local/bin/perl

##</code><code>##

use strict;
use warnings;

##</code><code>##

chomp @logging;
print @logging;

##</code><code>##

open (FILE,"<$prop");

##</code><code>##

foreach (@array) {
print @array;

##</code><code>##

$_ =~ s/DEBUG_MIN/WARN/g; }

##</code><code>##

@disable='find . -name toolkit_custom.properties';

##</code><code>##

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