needles

use v6;

# string to parse
my Str $str = ',"I said, ""Hi!""",';

# three alternatives for eol, separator, and quote
# as escape is identical to quote, I do not need to repeat
my @re = "\r\n", "\r", "\n", ",", "\"", Str;

my @chunks = $str.split(@re, :k, :skip-empty);

dd $str;
dd @re;
dd @chunks;


=>

Can only :k, :kv, :p when using multiple Cool needles
  in block <unit> at split.pl:10

due to the trailing Str in @re