my @files = qw(
   d:\log\exported\10Sep2003.elog
   d:\log\exported\11Sep2003.elog
   d:\log\exported\12Sep2003.elog
   d:\log\exported\13Sep2003.elog
   d:\log\exported\14Sep2003.elog
   d:\log\exported\15Sep2003.elog
   d:\log\exported\16Sep2003.elog
   d:\log\exported\17Sep2003.elog
   d:\log\exported\22Sep2003.elog
);