main::(-e:1):   0
  DB<1> $_ = "a,b"

  DB<2> x ($x,$y,$z) = ('default') x 3
0  'default'
1  'default'
2  'default'
  DB<3> x ($x,$y,$z) = split( ',', $_ )
0  'a'
1  'b'
2  undef