@bannedF = ("c:\\win32app\\toolkit",
            
            "c:\\winnt",
            "C:\\WINNT\\system32",
            
            "d:\\perl",
            "d:\\brossad");

my $folder = "c:\TEMP\sdfs";