DB<2> ($a,b) = chop
Can't modify constant item in list assignment at (eval 6)[c

  DB<3>