  m = $*;
  m[1]     = "A";
  m[[2]]   = "B";
  m[[[3]]] = "C";
  emit m;
