If only a single symbol ever appears, then all that matters is the overall structure of an expression, which can be captured as in the main text by the sequence of opening and closing brackets, given by Flatten[Characters[ToString[expr]]/.{"["  1,"]"  0, " ℯ "  {}}]