DB<30> x @_
0  1
1  2
  DB<31> x ($a,$b,$c,$d) = (@_, ("D1".."D4")[@_..3])
0  1
1  2
2  'D3'
3  'D4'
  DB<32>