DB<1> $c = "jdskq#jdskl"

  DB<2> @d = split '#', $c;

  DB<3> x @d
0  'jdskq'
1  'jdskl'