在perl中为了添加个人风格的彩色提示符，我们需要使用转义序列符。
那就是\033 但是也可以用\e 来代替：
print "\033[7;33mPlease choose the method to review your words:\033[0m";
=
print "\e33[7;33mPlease choose the method to review your words:\e[0m";
下面解释下[7;33m 和[0m
这里”[“ 表示颜色定义开始
7的位置用来 定义字体是高亮，还是下划线等
33的位置表前景色。
33后面的位置表示后景色上面没写出表示默认
[0m
表示恢复到默认颜色黑体白字
前景 背景 颜色
---------------------------------------
30 40 黑色
31 41 红色
32 42 绿色
33 43 黄色
34 44 蓝色
35 45 紫红色
36 46 青蓝色
37 47 白色
代码 意义
-------------------------
0 OFF
1 高亮显示
4 下划线
5 闪烁
7 反白显示
8 不可见
高亮
下划线