Mega Code Archive

 
Categories / Perl / File
 

The file list in current folder

print join ("\n", glob ('*'));