- or download this
use File::DosGlob qw(bsd_glob); # to get sane whitespace semantics
my $pattern = '/home/kelder/files/*.txt';
@ARGV = glob $pattern;
- or download this
Ai0.txt
Ai1.txt
...
...
Ai10.txt
Ai11.txt
- or download this
Output:
File1
File10
File11
File2