local $_;
for(readdir DIR) {
    $filesize{$_} = -s if /\.log$/i;
}