while($file = readdir($dh)) {
      next if $file eq '.';
      next if $file eq '..';
}