Split a character string based on change of character: Difference between revisions

Content deleted Content added
Bernie (talk | contribs)
Eliasen (talk | contribs)
Frink
Line 1,184:
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}}==