#!/usr/bin/perl -w 
use strict;  
use warnings;
my @folders=("inc","Inc","iNc","incr","src","Src");
my $mk = "./media/common/max/tail/common.mk:	$(PROJECT_ROOT)/../../Utils/inC";
my $folder_match;
my @folder_match;
foreach $folder_match(@folders)
{

   if($mk !~ /^\/\Q$folder_match\E$/i)# if $mk doesnot match to anyone of @folders,then only push
   {
   push @folder_match ,$mk;
   }
}
print "@folder_match\n";