PowerShell脚本故障求助：生成最长单词统计及单词排序输出

原脚本错误点 #

• 拼写错误：Lenght应为Length，且错误获取长度属性——组对象的Name才是目标单词，需通过$_.Name.Length获取单词长度
• 排序逻辑偏差：需求是提取最长的10个单词，原脚本却按单词出现次数Count排序，完全不符合需求
• 无文件输出逻辑：原函数仅返回结果，未将统计结果写入独立文件
• 第二个功能未落地：注释代码中的Sort-Bubble不是PowerShell内置命令，无法直接执行

修正后的完整脚本 #

# 功能1：提取文本中最长的10个单词并统计，写入文件
function Get-TopLongestWords {
    param (
        [Parameter(Mandatory=$true)]
        [string]$FilePath,
        [string]$OutputFile = ".\Top10LongestWords.txt"
    )

    # 提取所有长度≥2的英俄文单词
    $allMatches = Select-String -Path $FilePath -Pattern '\b[A-Za-zA-Яа-я]{2,}\b' -AllMatches
    $words = $allMatches.Matches.Value

    # 统计单词出现次数、计算长度，按长度降序排序（长度相同则按出现次数降序），取前10
    $topLongest = $words | Group-Object | ForEach-Object {
        [PSCustomObject]@{
            Word = $_.Name
            Length = $_.Name.Length
            Occurrences = $_.Count
        }
    } | Sort-Object -Property Length, Occurrences -Descending | Select-Object -First 10

    # 将结果写入文件（UTF8编码避免乱码）
    $topLongest | Format-Table -AutoSize | Out-File -Path $OutputFile -Encoding UTF8
    Write-Host "最长10个单词统计已写入: $OutputFile"
}

# 功能2：将文本中所有单词排序后写入文件
function Get-SortedWords {
    param (
        [Parameter(Mandatory=$true)]
        [string]$FilePath,
        [string]$OutputFile = ".\SortedWords.txt"
    )

    # 提取所有长度≥2的英俄文单词
    $allMatches = Select-String -Path $FilePath -Pattern '\b[A-Za-zA-Яа-я]{2,}\b' -AllMatches
    $words = $allMatches.Matches.Value

    # 按字母顺序排序（大小写不敏感）
    $sortedWords = $words | Sort-Object -CaseSensitive:$false

    # 将排序结果写入文件
    $sortedWords | Out-File -Path $OutputFile -Encoding UTF8
    Write-Host "排序后的单词已写入: $OutputFile"
}

# 调用示例：传入目标文本文件路径
Get-TopLongestWords -FilePath "1.txt"
Get-SortedWords -FilePath "1.txt"

关键修正说明 #

1. 修正单词长度计算：通过$_.Name.Length正确获取每个单词的长度，解决原脚本的拼写和属性错误
2. 调整排序逻辑：优先按单词长度降序排序，长度相同时按出现次数降序，确保取到符合需求的最长单词
3. 新增文件输出：使用Out-File并指定UTF8编码，避免俄文或特殊字符乱码
4. 实现排序功能：用PowerShell内置的Sort-Object替代不存在的Sort-Bubble，完成单词排序需求
5. 拆分独立函数：将两个功能拆分为单独函数，逻辑清晰，便于后续修改和复用

内容的提问来源于stack exchange，提问作者Расим Гусаинов