@files = glob("$dir/*.[ch]");
    @files = glob($files[$i]);