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