PowerShell中进行文件读取，信息排序，分类计数。

这是国外某大学QA的一道作业题，读取mainlog文件中的每一行信息，并获取有效的信息，也就是每条信息中第四个@后面的内容，然后进行分类与计数，要求是用Perl写，但我是用PowerShell完成的，文件截图如下：



代码如下：

<#
$logPath = "C:\Users\tylan\Desktop\mainlog.txt"
#>
function CheckInfo
{
param($logPath)
$logContent = Get-Content $logPath
$reg = "^.+@.+@.+@.+@.+$"
$categories = "",""
foreach($log in $logContent)
{
if($log -match $reg)
{
$partialLog = $log.split("@")
$category = $partialLog[4]
$categories += $category
}
}
$sortResult = $categories|Sort-Object|Get-Unique
foreach($cate in $sortResult)
{
$cate|Add-Member -MemberType NoteProperty -Name "cateCount" -Value 0
}
foreach($category in $categories)
{
foreach($cate in $sortResult)
{
if($category -eq $cate)
{
$cate.cateCount ++
}
}
}
foreach($cate in $sortResult)
{
if($cate -ne "")
{
$cate + " : " + $cate.cateCount
}
}
}
$logPath = "C:\Users\tylan\Desktop\mainlog.txt"
CheckInfo $logPath

测试结果如下：