powershell 正则人民币转大写

以前看到c#的正则，人民币转大写：

http://www.cnblogs.com/TianFang/archive/2012/08/09/2630912.html

转换成powershell:

function ctc([double]$num){
$s=$num.ToString("#L#E#D#C#K#E#D#C#J#E#D#C#I#E#D#C#H#E#D#C#G#E#D#C#F#E#D#C#.0B0A")
$d=[Regex]::Replace($s,'((?<=-|^)[^1-9]*)|((?''z''0)[0A-E]*((?=[1-9])|(?''-z''(?=[F-L.]|$))))|((?''b''[F-L])(?''z''0)[0A-L]*((?=[1-9])|(?''-z''(?=[.]|$))))','${b}${z}')
[Regex]::Replace($d,".",{param($str)"负元空零壹贰叁肆伍陆柒捌玖空空空空空空空分角拾佰仟萬億兆京垓秭穰"[[int][char]$str.Value - [int][char]'-'].ToString()})
}

1..100|%{$a=Get-Random 65535;[Convert]::tostring($a,2).substring(3).trimstart("0")}|%{$_
ctc $_} #测试

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!