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

Content added Content deleted
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}}==