lib/Str/Rpl.ps1
using namespace Microsoft.VisualBasic function Rpl-Sub($s,$sub,$by,$beg=1,$cnt=-1){[Strings]::Replace($s,$sub,$by,$beg,$cnt) } function Rpl-QQ ($qqStr,$ay) {$o=$qqStr;$ay|%{$o=Rpl-Sub $o '?' $_ -cnt 1}; $o} |