challenge-253/arne-sommer/raku/split-strings


1
2
3
4
5
6

#! /usr/bin/env raku

unit sub MAIN ($separator where $separator.chars == 1,
               *@words where @words.elems > 0);

say @words>>.split($separator).[*;*].grep( *.chars ).map( '"' ~ * ~ '"' ).join(",");