use strict;
use File::DosGlob qw(bsd_glob); # to get sane whitespace semantics

my $pattern = '/home/kelder/files/*.txt';

@ARGV = glob $pattern;

print "Processing $_"
    for @ARGV;