my @logfiles = glob "*.log";

##</code><code>##

while(readdir $dh) {
    next unless -f and /\.log$/;
    # Process log file here
}