mlr put '$y = substr($x, 4, 3)' ./${CASEDIR}/input
