Split a character string based on change of character: Difference between revisions
Content added Content deleted
Thundergnat (talk | contribs) m (→{{header|Perl 6}}: fix some typos, use correct Unicode names for complicated string) |
(Added Elixir) |
||
Line 151: | Line 151: | ||
{{Out}} |
{{Out}} |
||
<pre>g, HHH, 5, YY, ++, ///, \</pre> |
<pre>g, HHH, 5, YY, ++, ///, \</pre> |
||
=={{header|Elixir}}== |
|||
<lang elixir>split = fn str -> |
|||
IO.puts " input string: #{str}" |
|||
String.graphemes(str) |
|||
|> Enum.chunk_by(&(&1)) |
|||
|> Enum.map_join(", ", &Enum.join &1) |
|||
|> fn s -> IO.puts "output string: #{s}" end.() |
|||
end |
|||
split.("gHHH5YY++///\\")</lang> |
|||
{{out}} |
|||
<pre> |
|||
input string: gHHH5YY++///\ |
|||
output string: g, HHH, 5, YY, ++, ///, \ |
|||
</pre> |
|||
=={{header|Haskell}}== |
=={{header|Haskell}}== |