perl -pe "/LEU\b/ and s/ (.*)/$z3leu $z2leu $z1leu $1/"