foreach $mk (grep { $_ ne '.' } @folders) {
   ...
}