my @cfiles = glob('*.c');
print join("\n",@cfiles),"\n";