tools added Get-TextCasesDuration.ps1

tools/Get-TextCasesDuration.ps1

@@ -0,0 +1,15 @@
+#!/usr/bin/env pwsh
+
+Set-StrictMode -Version 3.0
+
+$result = 0
+
+Get-Content .\pp.txt
+    | Select-String -Pattern '^  <Duration msecs="(.*)"/>'
+    | ForEach-Object {
+        $_ -cmatch '<Duration msecs="(.*)"/>' | Out-Null
+        [float] $Matches[1]
+    }
+    | ForEach-Object { $result += $_ }
+
+$result / 1000