foreach $files ( @files ) {
	if( $files =~ m/.output/gi ) {
		my $name = $files;
		$name =~ s/.output//gi;
		$name =~ s/^cqa_//gi;
		if($ModNameList =~ m/$name/g) {
			print "Found:$name\n";
		}
	}
}