прикольная задачка
самое "короткое" решение, которое придумал:
Код:
$s = "-RASH+NOT"
$r = "[-+]?([^-+])(?<=([-+])[^-+]|([-+])[^-+]{2}|([-+])[^-+]{3}|([-+])[^-+]{4}|([-+])[^-+]{5}|([-+])[^-+]{6}|([-+])[^-+]{7})"
$x = StringRegExpReplace($s, $r, " \2\3\4\5\6\7\8\1")
ConsoleWrite($x &@CRLF)