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

m
(→‎{{header|Perl 6}}: Add perl 6 example)
Line 216:
=={{header|Perl 6}}==
{{works with|Rakudo|2016.12}}
Accept a string at the command line to split,; if none provided, use default.
 
<lang perl6>my $string = @*ARGS[0] // < gHHH5YY++///\ >;
10,333

edits