uag get app attributes

param(
    [Parameter(Mandatory=$true)]
    [string]$SourceFile,
    [Parameter(Mandatory=$true)]
    [string]$AppName
)

$fileObj = [system.IO.File]::OpenText($SourceFile)
$str = $fileObj.ReadToEnd()

$reg = New-Object system.Text.RegularExpressions.Regex("m_csAppName_([0-9]+)=$AppName\r\n",[system.Text.RegularExpressions.RegexOptions]::Multiline)

$match = $reg.Match($str)

if (-not $match.Success){
    Write-Error "Не удалось найти приложение с именем $AppName"
    return -1
}

$AppID = $match.Groups[1].Value

[regex]::Matches($str, "[\t]+(m_[^_]+_$AppID[^=]*=[^\r\n]*)\r\n", "Multiline") | foreach {
    $_.Groups[1].Value
}