Select Code to Download

use File::DosGlob qw(bsd_glob);

print join "\n", glob "d:/Leamington 24.11.05/Leamington/*.dat";