my @files = glob('*'); # current directory
print "",join("\n",@files), "\n";