went

用-f格式化就很好操作

$s = @'
岁月难得沉默
秋风厌倦漂泊
夕阳赖着不走
挂在墙头舍不得我
昔日伊人耳边话
已和潮声向东流
再回首
#开始
      黄种人"在东京", //日本
             白人"在纽约", //美国

"在刚果",//南非
        黑人//印度

#结束
往事也随枫叶一片片落
爱已走到尽头
"在刚f果",//南非
恨也放弃承诺
命运自认幽默
想法太多由不得我
壮志凌云几分酬
知己难逢几人留
'@

$hash = [ordered]@{}
if($s -match '(?s)#开始(.*?)#结束'){
    [regex]::Matches($Matches[1],'(?m)"(.+?)",\s*//(.+?)$') | foreach { $hash.($_.Groups[2].Value) = $_.Groups[1].Value }
}

$hash.Keys | foreach { '{0} = "{1}"' -f $_,$hash[$_] }
复制代码

went

&{
    代码块
}
可以把整个代码块的输出转换为一个字符串

$hash = [ordered]@{}
if($s -match '(?s)#开始(.*?)#结束'){
    [regex]::Matches($Matches[1],'(?m)"(.+?)",\s*//(.+?)$') | foreach { $hash.($_.Groups[2].Value) = $_.Groups[1].Value }
}

$h = 
&{
    '$hash = [ordered]@{'
    $hash.Keys | foreach { '{0}{1} = "{2}"' -f "`t",$_,$hash[$_] }
    '}'
}

$h
复制代码

went

纠正一下
&{
    代码块
} 转换为Object数组

&{
    代码块
} | Out-String 转换为字符串

went

这里面有关于单行和多行匹配的详细介绍
https://docs.microsoft.com/zh-cn ... -expression-options

went

回复 10# 5i365


    我运行没问题

went

正则改一下,把末尾的换行符去掉

'(?m)"(.+?)",\s*//(\S+?)\s$'
复制代码

'(?m)"(.+?)",\s*//\s*(.+?)\s*$'
复制代码