Mega Code Archive
Categories
/
Perl
/
File
Get file list under C
print join ("\n", glob ('C:/*')); print join ("\n", glob ('C:\\*'));