<Configuration>

<Controls>

<Control>

<Name>PSToken</Name>

<CustomControl>

<CustomEntries>

<CustomEntry>

<CustomItem>

<ExpressionBinding>

<ItemSelectionCondition>

<ScriptBlock>

$_.PreviousToken -and $_.Text

</ScriptBlock>

</ItemSelectionCondition>

<ScriptBlock>

$token = $_

$prevEnd = $_.PreviousToken.Start + $_.PreviousToken.Length

$substring = $_.Text.Substring($prevEnd, $token.Start - $prevEnd)

if ($substring) { $substring} else { '' }

</ScriptBlock>

</ExpressionBinding>

<ExpressionBinding>

<ItemSelectionCondition>

<ScriptBlock>

$_.Type -eq 'Comment'

</ScriptBlock>

</ItemSelectionCondition>

<ScriptBlock>$moduleName = 'PipeScript'

do {

$lm = Get-Module -Name $moduleName -ErrorAction Ignore

if (-not $lm) { continue }

if ($lm.FormatPartsLoaded) { break }

$wholeScript = @(foreach ($formatFilePath in $lm.exportedFormatFiles) {

foreach ($partNodeName in Select-Xml -LiteralPath $formatFilePath -XPath "/Configuration/Controls/Control/Name[starts-with(., '$')]") {

$ParentNode = $partNodeName.Node.ParentNode

"$($ParentNode.Name)={

$($ParentNode.CustomControl.CustomEntries.CustomEntry.CustomItem.ExpressionBinding.ScriptBlock)}"

}

}) -join [Environment]::NewLine

New-Module -Name "${ModuleName}.format.ps1xml" -ScriptBlock ([ScriptBlock]::Create(($wholeScript + ';Export-ModuleMember -Variable *'))) |

Import-Module -Global

$onRemove = [ScriptBlock]::Create("Remove-Module '${ModuleName}.format.ps1xml'")

if (-not $lm.OnRemove) {

$lm.OnRemove = $onRemove

} else {

$lm.OnRemove = [ScriptBlock]::Create($onRemove.ToString() + '' + [Environment]::NewLine + $lm.OnRemove)

}

$lm | Add-Member NoteProperty FormatPartsLoaded $true -Force

} while ($false)

@(&amp; ${PipeScript_Format-RichText} -ForegroundColor 'Success' -NoClear) -join ''</ScriptBlock>

</ExpressionBinding>

<ExpressionBinding>

<ItemSelectionCondition>

<ScriptBlock>

$_.Type -eq 'Comment'

</ScriptBlock>

</ItemSelectionCondition>

<PropertyName>Content</PropertyName>

</ExpressionBinding>

<ExpressionBinding>

<ItemSelectionCondition>

<ScriptBlock>

$_.Type -eq 'Comment'

</ScriptBlock>

</ItemSelectionCondition>

<ScriptBlock>@(&amp; ${PipeScript_Format-RichText} -ForegroundColor 'Success' ) -join ''</ScriptBlock>

</ExpressionBinding>

<ExpressionBinding>

<ItemSelectionCondition>

<ScriptBlock>

$_.Type -in 'Keyword', 'String', 'CommandArgument'

</ScriptBlock>

</ItemSelectionCondition>

<ScriptBlock>@(&amp; ${PipeScript_Format-RichText} -ForegroundColor 'Verbose' -NoClear) -join ''</ScriptBlock>

</ExpressionBinding>

<ExpressionBinding>

<ItemSelectionCondition>

<ScriptBlock>

$_.Type -in 'Keyword', 'String', 'CommandArgument'

</ScriptBlock>

</ItemSelectionCondition>

<PropertyName>Content</PropertyName>

</ExpressionBinding>

<ExpressionBinding>

<ItemSelectionCondition>

<ScriptBlock>

$_.Type -in 'Keyword', 'String', 'CommandArgument'

</ScriptBlock>

</ItemSelectionCondition>

<ScriptBlock>@(&amp; ${PipeScript_Format-RichText} -ForegroundColor 'Verbose' ) -join ''</ScriptBlock>

</ExpressionBinding>

<ExpressionBinding>

<ItemSelectionCondition>

<ScriptBlock>

$_.Type -in 'Variable', 'Command'

</ScriptBlock>

</ItemSelectionCondition>

<ScriptBlock>@(&amp; ${PipeScript_Format-RichText} -ForegroundColor 'Warning' -NoClear) -join ''</ScriptBlock>

</ExpressionBinding>

<ExpressionBinding>

<ItemSelectionCondition>

<ScriptBlock>

$_.Type -in 'Variable', 'Command'

</ScriptBlock>

</ItemSelectionCondition>

<PropertyName>Content</PropertyName>

</ExpressionBinding>

<ExpressionBinding>

<ItemSelectionCondition>

<ScriptBlock>

$_.Type -in 'Variable', 'Command'

</ScriptBlock>

</ItemSelectionCondition>

<ScriptBlock>@(&amp; ${PipeScript_Format-RichText} -ForegroundColor 'Warning' ) -join ''</ScriptBlock>

</ExpressionBinding>

<ExpressionBinding>

<ItemSelectionCondition>

<ScriptBlock>

$_.Type -in 'CommandParameter'

</ScriptBlock>

</ItemSelectionCondition>

<ScriptBlock>@(&amp; ${PipeScript_Format-RichText} -ForegroundColor 'Magenta' -NoClear) -join ''</ScriptBlock>

</ExpressionBinding>

<ExpressionBinding>

<ItemSelectionCondition>

<ScriptBlock>

$_.Type -in 'CommandParameter'

</ScriptBlock>

</ItemSelectionCondition>

<PropertyName>Content</PropertyName>

</ExpressionBinding>

<ExpressionBinding>

<ItemSelectionCondition>

<ScriptBlock>

$_.Type -in 'CommandParameter'

</ScriptBlock>

</ItemSelectionCondition>

<ScriptBlock>@(&amp; ${PipeScript_Format-RichText} -ForegroundColor 'Magenta' ) -join ''</ScriptBlock>

</ExpressionBinding>

<ExpressionBinding>

<ItemSelectionCondition>

<ScriptBlock>

$_.Type -in 'Operator','GroupStart', 'GroupEnd'

</ScriptBlock>

</ItemSelectionCondition>

<ScriptBlock>@(&amp; ${PipeScript_Format-RichText} -ForegroundColor 'Magenta' -NoClear) -join ''</ScriptBlock>

</ExpressionBinding>

<ExpressionBinding>

<ItemSelectionCondition>

<ScriptBlock>

$_.Type -in 'Operator','GroupStart', 'GroupEnd'

</ScriptBlock>

</ItemSelectionCondition>

<PropertyName>Content</PropertyName>

</ExpressionBinding>

<ExpressionBinding>

<ItemSelectionCondition>

<ScriptBlock>

$_.Type -in 'Operator','GroupStart', 'GroupEnd'

</ScriptBlock>

</ItemSelectionCondition>

<ScriptBlock>@(&amp; ${PipeScript_Format-RichText} -ForegroundColor 'Magenta' ) -join ''</ScriptBlock>

</ExpressionBinding>

<ExpressionBinding>

<ItemSelectionCondition>

<ScriptBlock>

$_.Type -notin 'Comment',

'Keyword', 'String', 'CommandArgument',

'Variable', 'Command',

'CommandParameter',

'Operator','GroupStart', 'GroupEnd'

</ScriptBlock>

</ItemSelectionCondition>

<PropertyName>Content</PropertyName>

</ExpressionBinding>

</CustomItem>

</CustomEntry>

</CustomEntries>

</CustomControl>

</Control>

<Control>

<Name>${PipeScript_Format-RichText}</Name>

<CustomControl>

<CustomEntries>

<CustomEntry>

<CustomItem>

<ExpressionBinding>

<ScriptBlock>

&lt;#

.Synopsis

Formats the text color of output

.Description

Formats the text color of output

* ForegroundColor

* BackgroundColor

* Bold

* Underline

.Notes

Stylized Output works in two contexts at present:

* Rich consoles (Windows Terminal, PowerShell.exe, Pwsh.exe) (when $host.UI.SupportsVirtualTerminal)

* Web pages (Based off the presence of a $Request variable, or when $host.UI.SupportsHTML (you must add this property to $host.UI))

#&gt;

[Management.Automation.Cmdlet("Format","Object")]

[ValidateScript({

$canUseANSI = $host.UI.SupportsVirtualTerminal

$canUseHTML = $Request -or $host.UI.SupportsHTML -or $OutputMode -eq 'HTML'

if (-not ($canUseANSI -or $canUseHTML)) { return $false}

return $true

})]

[OutputType([string])]

param(

# The input object

[Parameter(ValueFromPipeline)]

[PSObject]

$InputObject,

# The foreground color

[string]$ForegroundColor,

# The background color

[string]$BackgroundColor,

# If set, will render as bold

[switch]$Bold,

# If set, will render as italic.

[Alias('Italics')]

[switch]$Italic,

# If set, will render as faint

[switch]$Faint,

# If set, will render as hidden text.

[switch]$Hide,

# If set, will render as blinking (not supported in all terminals or HTML)

[switch]$Blink,

# If set, will render as strikethru

[Alias('Strikethrough', 'Crossout')]

[switch]$Strikethru,

# If set, will underline text

[switch]$Underline,

# If set, will double underline text.

[switch]$DoubleUnderline,

# If set, will invert text

[switch]$Invert,

# If provided, will create a hyperlink to a given uri

[Alias('Hyperlink', 'Href')]

[uri]

$Link,

# If set, will not clear formatting

[switch]$NoClear,

# The alignment. Defaulting to Left.

# Setting an alignment will pad the remaining space on each line.

[ValidateSet('Left','Right','Center')]

[string]

$Alignment,

# The length of a line. By default, the buffer width

[int]$LineLength = $($host.UI.RawUI.BufferSize.Width)

)

begin {

$canUseANSI = $host.UI.SupportsVirtualTerminal

$canUseHTML = $Request -or $host.UI.SupportsHTML -or $OutputMode -eq 'HTML'

$knownStreams = @{

Output='';Error='BrightRed';Warning='BrightYellow';

Verbose='BrightCyan';Debug='Yellow';Progress='Cyan';

Success='BrightGreen';Failure='Red';Default=''}

$ansiCode = [Regex]::new(@'

(?&lt;ANSI_Code&gt;

(?-i)\e # An Escape

\[ # Followed by a bracket

(?&lt;ParameterBytes&gt;[\d\:\;\&lt;\=\&gt;\?]{0,}) # Followed by zero or more parameter

bytes

(?&lt;IntermediateBytes&gt;[\s\!\"\#\$\%\&amp;\'\(\)\*\+\,\-\.\/]{0,}) # Followed by zero or more

intermediate bytes

(?&lt;FinalByte&gt;[\@ABCDEFGHIJKLMNOPQRSTUVWXYZ\[\\\]\^_\`abcdefghijklmnopqrstuvwxyz\{\|\}\~]) # Followed by a final byte

)

'@)

$esc = [char]0x1b

$standardColors = 'Black', 'Red', 'Green', 'Yellow', 'Blue','Magenta', 'Cyan', 'White'

$brightColors = 'BrightBlack', 'BrightRed', 'BrightGreen', 'BrightYellow', 'BrightBlue','BrightMagenta', 'BrightCyan', 'BrightWhite'

$allOutput = @()

$n =0

$cssClasses = @()

$colorAttributes =

@(:nextColor foreach ($hc in $ForegroundColor,$BackgroundColor) {

$n++

if (-not $hc) { continue }

if ($hc[0] -eq $esc) {

if ($canUseANSI) {

$hc; continue

}

}

$ansiStartPoint = if ($n -eq 1) { 30 } else { 40 }

if ($knownStreams.ContainsKey($hc)) {

$i = $brightColors.IndexOf($knownStreams[$hc])

if ($canUseHTML) {

$cssClasses += $hc

} else {

if ($i -ge 0 -and $canUseANSI) {

'' + $esc + "[1;$($ansiStartPoint + $i)m"

} else {

$i = $standardColors.IndexOf($knownStreams[$hc])

if ($i -ge 0 -and $canUseANSI) {

'' + $esc + "[1;$($ansiStartPoint + $i)m"

} elseif ($i -le 0 -and $canUseANSI) {

'' + $esc + "[$($ansistartpoint + 8):5m"

}

}

}

continue nextColor

}

elseif ($standardColors -contains $hc) {

for ($i = 0; $i -lt $standardColors.Count;$i++) {

if ($standardColors[$i] -eq $hc) {

if ($canUseANSI -and -not $canUseHTML) {

'' + $esc + "[$($ansiStartPoint + $i)m"

} else {

$cssClasses += $standardColors[$i]

}

continue nextColor

}

}

} elseif ($brightColors -contains $hc) {

for ($i = 0; $i -lt $brightColors.Count;$i++) {

if ($brightColors[$i] -eq $hc) {

if ($canUseANSI -and -not $canUseHTML) {

'' + $esc + "[1;$($ansiStartPoint + $i)m"

} else {

$cssClasses += $standardColors[$i]

}

continue nextColor

}

}

}

elseif ($psStyle -and $psStyle.Formatting.$hc -and

$psStyle.Formatting.$hc -match '^\e') {

if ($canUseANSI -and -not $canUseHTML) {

$psStyle.Formatting.$hc

} else {

$cssClasses += "formatting-$hc"

}

}

elseif (-not $n -and $psStyle -and $psStyle.Foreground.$hc -and

$psStyle.Foreground.$hc -match '^\e' ) {

if ($canUseANSI -and -not $canUseHTML) {

$psStyle.Foreground.$hc

} else {

$cssClasses += "foreground-$hc"

}

}

elseif ($n -and $psStyle -and $psStyle.Background.$hc -and

$psStyle.Background.$hc -match '^\e') {

if ($canUseANSI -and -not $canUseHTML) {

$psStyle.Background.$hc

} else {

$cssClasses += "background-$hc"

}

}

if ($hc -and $hc -notmatch '^[\#\e]') {

$placesToLook=

@(if ($hc.Contains('.')) {

$module, $setting = $hc -split '\.', 2

$theModule = Get-Module $module

$theModule.PrivateData.Color,

$theModule.PrivateData.Colors,

$theModule.PrivateData.Colour,

$theModule.PrivateData.Colours,

$theModule.PrivateData.EZOut,

$global:PSColors,

$global:PSColours

} else {

$setting = $hc

$moduleColorSetting = $theModule.PrivateData.PSColors.$setting

})

foreach ($place in $placesToLook) {

if (-not $place) { continue }

foreach ($propName in $setting -split '\.') {

$place = $place.$propName

if (-not $place) { break }

}

if ($place -and "$place".StartsWith('#') -and 4,7 -contains "$place".Length) {

$hc = $place

continue

}

}

if (-not $hc.StartsWith -or -not $hc.StartsWith('#')) {

continue

}

}

$r,$g,$b = if ($hc.Length -eq 7) {

[int]::Parse($hc[1..2]-join'', 'HexNumber')

[int]::Parse($hc[3..4]-join '', 'HexNumber')

[int]::Parse($hc[5..6] -join'', 'HexNumber')

}elseif ($hc.Length -eq 4) {

[int]::Parse($hc[1], 'HexNumber') * 16

[int]::Parse($hc[2], 'HexNumber') * 16

[int]::Parse($hc[3], 'HexNumber') * 16

}

if ($canUseHTML) {

if ($n -eq 1) { "color:$hc" }

elseif ($n -eq 2) { "background-color:$hc"}

}

elseif ($canUseANSI) {

if ($n -eq 1) { $esc+"[38;2;$r;$g;${b}m" }

elseif ($n -eq 2) { $esc+"[48;2;$r;$g;${b}m" }

}

})

$styleAttributes = @() + $colorAttributes

$styleAttributes += @(

if ($Bold) {

if ($canUseHTML) {"font-weight:bold"}

elseif ($canUseANSI) { '' + $esc + "[1m" }

}

if ($Faint) {

if ($canUseHTML) { "opacity:.5" }

elseif ($canUseANSI) { '' + $esc + "[2m" }

}

if ($Italic) {

if ($canUseHTML) { "font-weight:bold" }

elseif ($canUseANSI) {'' + $esc + "[3m" }

}

if ($Underline -and -not $doubleUnderline) {

if ($canUseHTML) { "text-decoration:underline"}

elseif ($canUseANSI) {'' +$esc + "[4m" }

}

if ($Blink) {

if ($canUseANSI) { '' +$esc + "[5m" }

}

if ($invert) {

if ($canUseHTML) {"filter:invert(100%)"}

elseif ($canUseANSI) { '' + $esc + "[7m"}

}

if ($hide) {

if ($canUseHTML) {"opacity:0"}

elseif ($canUseANSI) { '' + $esc + "[8m"}

}

if ($Strikethru) {

if ($canUseHTML) {"text-decoration: line-through"}

elseif ($canUseANSI) { '' +$esc + "[9m" }

}

if ($DoubleUnderline) {

if ($canUseHTML) { "border-bottom: 3px double;"}

elseif ($canUseANSI) {'' +$esc + "[21m" }

}

if ($Alignment -and $canUseHTML) {

"display:block;text-align:$($Alignment.ToLower())"

}

if ($Link) {

if ($canUseHTML) {

# Hyperlinks need to be a nested element

# so we will not add it to style attributes for HTML

}

elseif ($canUseANSI) {

# For ANSI,

'' + $esc + ']8;;' + $Link + $esc + '\'

}

}

)

$header =

if ($canUseHTML) {

"&lt;span$(

if ($styleAttributes) { " style='$($styleAttributes -join ';')'"}

)$(

if ($cssClasses) { " class='$($cssClasses -join ' ')'"}

)&gt;" + $(

if ($Link) {

"&lt;a href='$link'&gt;"

}

)

} elseif ($canUseANSI) {

$styleAttributes -join ''

}

}

process {

$inputObjectAsString =

"$(if ($inputObject) { $inputObject | Out-String})".Trim()

$inputObjectAsString =

if ($Alignment -and -not $canUseHTML) {

(@(foreach ($inputObjectLine in ($inputObjectAsString -split '(?&gt;\r\n|\n)')) {

$inputObjectLength = $ansiCode.Replace($inputObjectLine, '').Length

if ($inputObjectLength -lt $LineLength) {

if ($Alignment -eq 'Left') {

$inputObjectLine

} elseif ($Alignment -eq 'Right') {

(' ' * ($LineLength - $inputObjectLength)) + $inputObjectLine

} else {

$half = ($LineLength - $inputObjectLength)/2

(' ' * [Math]::Floor($half)) + $inputObjectLine +

(' ' * [Math]::Ceiling($half))

}

}

else {

$inputObjectLine

}

}) -join [Environment]::NewLine) + [Environment]::newline

} else {

$inputObjectAsString

}

$allOutput +=

if ($header) {

"$header" + $inputObjectAsString

}

elseif ($inputObject) {

$inputObjectAsString

}

}

end {

if (-not $NoClear) {

$allOutput +=

if ($canUseHTML) {

if ($Link) {

"&lt;/a&gt;"

}

"&lt;/span&gt;"

}

elseif ($canUseANSI) {

if ($Bold -or $Faint -or $colorAttributes -match '\[1;') {

"$esc[22m"

}

if ($Italic) {

"$esc[23m"

}

if ($Underline -or $doubleUnderline) {

"$esc[24m"

}

if ($Blink) {

"$esc[25m"

}

if ($Invert) {

"$esc[27m"

}

if ($hide) {

"$esc[28m"

}

if ($Strikethru) {

"$esc[29m"

}

if ($ForegroundColor) {

"$esc[39m"

}

if ($BackgroundColor) {

"$esc[49m"

}

if ($Link) {

"$esc]8;;$esc\"

}

if (-not ($Underline -or $Bold -or $Invert -or $ForegroundColor -or $BackgroundColor)) {

'' + $esc + '[0m'

}

}

}

$allOutput -join ''

}

</ScriptBlock>

</ExpressionBinding>

</CustomItem>

</CustomEntry>

</CustomEntries>

</CustomControl>

</Control>

<Control>

<Name>${PipeScript_Format-Hashtable}</Name>

<CustomControl>

<CustomEntries>

<CustomEntry>

<CustomItem>

<ExpressionBinding>

<ScriptBlock>

&lt;#

.Synopsis

Takes an creates a script to recreate a hashtable

.Description

Allows you to take a hashtable and create a hashtable you would embed into a script.

Handles nested hashtables and indents nested hashtables automatically.

.Example

# Corrects the presentation of a PowerShell hashtable

[Ordered]@{Foo='Bar';Baz='Bing';Boo=@{Bam='Blang'}} | Format-Hashtable

.Outputs

[string]

.Outputs

[ScriptBlock]

.Link

about_hash_tables

#&gt;

[OutputType([string], [ScriptBlock])]

[Management.Automation.Cmdlet("Format", "Object")]

[ValidateScript({return $true})]

param(

# The hashtable or PSObject that will be written as a PowerShell Hashtable

[Parameter(Position=0,ValueFromPipeline,ValueFromPipelineByPropertyName)]

[PSObject]

$InputObject,

# Returns the content as a script block, rather than a string

[switch]$AsScriptBlock,

# If set, will return the hashtable and all nested hashtables as custom objects.

[switch]$AsPSObject,

# If set, items in the hashtable will be sorted alphabetically

[Switch]$Sort,

# If set, credentials will be expanded out into a hashtable containing the username and password.

[Switch]$ExpandCredential,

# If set, the outputted hashtable will not contain any extra whitespace.

[switch]$Compress,

# If set, will embed ScriptBlocks as literal strings,

# so that the resulting hashtable could work in data language mode.

[switch]$Safe,

# The maximum depth to enumerate.

# Beneath this depth, items will simply be returned as $null.

[int]$Depth

)

begin {

$myCmd = $MyInvocation.MyCommand

$myScriptBlock = $myCmd.ScriptBlock

}

process {

if (-not $Compress) {

$psCallstack = @(Get-PSCallStack)

$callstack = @(foreach ($cs in $psCallstack) {

if ($cs.InvocationInfo.MyCommand.ScriptBlock -eq $myCmd.ScriptBlock) {

$cs

}

})

} else {

$callstack = @()

}

$myParams = @{} + $PSBoundParameters

$myParams.Remove('InputObject')

$CurrentDepth = $callStack.Count

if ($Depth -and $CurrentDepth -gt $Depth) {

return '$null'

}

if ($inputObject -and

$inputObject -isnot [Collections.IDictionary] -and

$inputObject -isnot [string] -and

(-not $InputObject.GetType().IsPrimitive) -and

$InputObject -isnot [Enum]

)

{

$newInputObject = [Ordered]@{

PSTypeName=@($inputobject.pstypenames)[0]

}

if ('System.Object', 'System.Management.Automation.PSCustomObject' -contains

$newInputObject.pstypename) {

$newInputObject.Remove('PSTypeName')

}

foreach ($prop in $inputObject.psobject.properties) {

$newInputObject[$prop.Name] = $prop.Value

}

$inputObject = $newInputObject

}

$scriptString = ""

if ($inputObject -is [Collections.IDictionary]) {

#region Indent

$indent = $CurrentDepth * 4

$scriptString+=

if ($Compress) {

"@{"

} else {

"@{

"

}

#endregion Indent

#region Include

$items = $inputObject.GetEnumerator()

if ($Sort) {

$items = $items | Sort-Object Key

}

foreach ($kv in $items) {

if (-not $Compress) {

$scriptString+=" " * $indent

}

if ($kv.Key -eq 'keywords') {

$null = $null

}

$keyString = "$($kv.Key)"

if ($keyString.IndexOfAny(" _.#-+:;()'!?^@#$%&amp;=|".ToCharArray()) -ne -1) {

if ($keyString.IndexOf("'") -ne -1) {

$scriptString+="'$($keyString.Replace("'","''"))' = "

} else {

$scriptString+="'$keyString' = "

}

} elseif ($keyString) {

$scriptString+="$keyString = "

}

$value = $kv.Value

$value =

if ($value -is [string]) {

"'" +

$value.Replace("'","''").Replace("’", "’’").Replace("‘", "‘‘") +

"'"

} elseif (

$value -is [ScriptBlock] -or $value -is [Management.Automation.Language.Ast]

) {

if ($safe) {

"@'" + [Environment]::NewLine +

$value

[Environment]::NewLine + "'@'"

} else {

"{$value}"

}

} elseif ($value -is [switch]) {

if ($value) { '$true' } else { '$false' }

} elseif ($value -is [DateTime]) {

"[DateTime]'$($value.ToString("o"))'"

}

elseif ($value -is [Timespan]) {

if ($Safe) {

"'$($value.ToString())'"

} else {

"[Timespan]'$($value.ToString())'"

}

}

elseif ($value -is [bool]) {

if ($value) { '$true'} else { '$false' }

} elseif ($value -and $value.GetType -and (

$value.GetType().IsArray -or $value -is [Collections.IList] -or

($value -is [Collections.IEnumerable] -and $value -isnot [Collections.IDictionary])

)) {

$joiner =

if ($Compress) {

','

} else {

"," + [Environment]::NewLine + (' ' * ($indent + 4))

}

@(foreach ($v in $value) {

if ($v -is [Collections.IDictionary]) {

&amp; $myScriptBlock -InputObject $v @myParams

} elseif ($v -is [ScriptBlock] -or $v -is [Management.Automation.Language.Ast]) {

if ($Safe) {

} else {

"{$v}"

}

} elseif ($v -is [Object] -and $v -isnot [string]) {

&amp; $myScriptBlock -InputObject $v @myParams

} elseif ($v -is [bool] -or $v -is [switch]) {

"`$$v"

} elseif ($null -ne ($v -as [float])) {

$v

} else {

("'" + "$v".Replace("'","''").Replace("’", "’’").Replace("‘", "‘‘") + "'")

}

}) -join $joiner

} elseif ($value -as [Collections.IDictionary[]]) {

@(foreach ($v in $value) {

&amp; $myScriptBlock $v @myParams

}) -join ","

} elseif ($value -is [Collections.IDictionary]) {

"$(&amp; $myScriptBlock $value @myParams)"

} elseif ($value -as [Double]) {

"$value"

} elseif ($value -is [Management.Automation.PSCredential] -and $ExpandCredential) {

&amp; $myScriptBlock -InputObject ([Ordered]@{

Username = $value.Username

Password = $value.GetNetworkCredential().Password

}) @myParams

} else {

$valueString = "'$($value -replace "'", "''")'"

if ($valueString[0] -eq "'" -and

$valueString[1] -eq "@" -and

$valueString[2] -eq "{") {

&amp; $myScriptBlock -InputObject $value @myParams

} else {

$valueString

}

}

$scriptString+=

if ($Compress) {

"$value;"

} else {

"$value" + [Environment]::NewLine

}

}

if (-not $Compress) {

$scriptString += " " * ($CurrentDepth - 1) * 4

}

$scriptString += "}"

if ($AsPSObject -and -not $Safe) {

$scriptString = "[PSCustomObject][Ordered]$ScriptString"

}

#endregion Include

}

elseif ($InputObject -is [string]) {

$scriptString = "'" + $InputObject.Replace("'", "''") + "'"

}

elseif (

$InputObject.GetType -and $InputObject.GetType().IsPrimitive

) {

$scriptString += "$inputObject"

}

elseif ($inputObject -is [Enum]) {

$scriptString =

if ($safe) {

"'" + $InputObject.ToString().Replace("'", "''") + "'"

} else {

"[$($InputObject.GetType().FullName -replace '^System\.')]" +

"'" + $InputObject.ToString().Replace("'", "''") + "'"

}

}

elseif (-not $inputObject) {

$scriptString += '$null'

}

if ($AsScriptBlock) {

[ScriptBlock]::Create($scriptString)

} else {

$scriptString

}

}

</ScriptBlock>

</ExpressionBinding>

</CustomItem>

</CustomEntry>

</CustomEntries>

</CustomControl>

</Control>

<Control>

<Name>${PipeScript_Format-YAML}</Name>

<CustomControl>

<CustomEntries>

<CustomEntry>

<CustomItem>

<ExpressionBinding>

<ScriptBlock>

&lt;#

.SYNOPSIS

Formats objects as YAML

.DESCRIPTION

Formats an object as YAML.

.EXAMPLE

Format-Yaml -InputObject @("a", "b", "c")

.EXAMPLE

@{a="b";c="d";e=@{f=@('g')}} | Format-Yaml

#&gt;

[Management.Automation.Cmdlet("Format","Object")]

[ValidateScript({return $true})]

param(

# The InputObject.

[Parameter(ValueFromPipeline)]

[PSObject]

$InputObject,

# If set, will make a YAML header by adding a YAML Document tag above and below output.

[Alias('YAMLDocument')]

[switch]

$YamlHeader,

[int]

$Indent = 0,

# The maximum depth of objects to include.

# Beyond this depth, an empty string will be returned.

[int]

$Depth

)

begin {

if (-not $Depth) { $depth = $FormatEnumerationLimit }

$toYaml = {

param(

[Parameter(ValueFromPipeline,Position=0)]$Object,

[Object]$Parent,

[Object]$GrandParent,

[int]$Indent = 0)

begin { $n = 0; $mySelf = $myInvocation.MyCommand.ScriptBlock }

process {

$n++

if ($Object -eq $null) { return }

if ($depth) {

$myDepth = $indent / 2

if ($myDepth -gt $depth) {

return ''

}

}

if ($Parent -and $Parent -is [Collections.IList]) {

if ($Parent.IndexOf($Object) -gt 0) { ' ' * $Indent }

'- '

}

#region Primitives

if ( $Object -is [string] ) { # If it's a string

if ($object -match '\n') { # see if it's a multline string.

"|" # If it is, emit the multiline indicator

$indent +=2

foreach ($l in $object -split '(?&gt;\r\n|\n)') { # and emit each line indented

[Environment]::NewLine

' ' * $indent

$l

}

$indent -=2

} elseif ("$object".Contains('*')) {

"'$($Object -replace "'","''")'"

} else {

$object

}

if ($Parent -is [Collections.IList]) { # If the parent object was a list

[Environment]::NewLine # emit a newline.

}

return # Once the string has been emitted, return.

}

if ( $Object.GetType().IsPrimitive ) { # If it is a primitive type

"$Object".ToLower() # Emit it in lowercase.

if ($Parent -is [Collections.IList]) {

[Environment]::NewLine

}

return

}

#endregion Primitives

#region KVP

if ( $Object -is [Collections.DictionaryEntry] -or $object -is [Management.Automation.PSPropertyInfo]) {

if ($Parent -isnot [Collections.IList] -and

($GrandParent -isnot [Collections.IList] -or $n -gt 1)) {

[Environment]::NewLine + (" " * $Indent)

}

if ($object.Key -and $Object.Key -is [string]) {

$Object.Key +": "

} elseif ($object.Name -and $object.Name -is [string]) {

$Object.Name +": "

}

}

if ( $Object -is [Collections.DictionaryEntry] -or $Object -is [Management.Automation.PSPropertyInfo]) {

&amp; $mySelf -Object $Object.Value -Parent $Object -GrandParent $parent -Indent $Indent

return

}