perl -pe 's/\e\[[0-9;]*[mK]//g'