my @chars = split //,$folder;
foreach (@chars){
   if($_ eq "*" || $_ eq '$' || $_ eq "&" || $_ eq "." || $_ eq "?" || $_ eq '\'){

##</code><code>##

if ($folder =~ /[$&.?\\]/) {