Split a character string based on change of character: Difference between revisions
Content added Content deleted
(Frink) |
|||
| Line 1,184: | Line 1,184: | ||
end function</lang> |
end function</lang> |
||
=={{header|Frink}}== |
|||
<lang frink>s = "gHHH5YY++///\\" |
|||
println[join[", ", map[getFunction["first", 1], s =~ %r/((.)\2*)/g]]]</lang> |
|||
{{out}} |
|||
<pre> |
|||
g, HHH, 5, YY, ++, ///, \ |
|||
</pre> |
|||
=={{header|FutureBasic}}== |
=={{header|FutureBasic}}== |
||