in reply to using glob to get files

try  my @files=<$INFOFILES/*.db>;
Boris

In Section Seekers of Perl Wisdom