[ Object ] case: [ Object ] do: [ Task ]

var x := ['**'].
  x
  case: ['*'] do: { Pen write: 1. },
  case: ['**'] do: { Pen write: 2. },
  case: ['***'] do: { Pen write: 3. }.
 Pen stop.