标签：perl
看到首页上推荐《十分钟完成Bash脚本进阶！列举Bash的经典用法及其案例》
http://os.51cto.com/art/201709/552109.htm
然后用perl写了一个等边三角形的命令，参数是行数
perl -e ‘for (1..$ARGV[0]){$c=int(rand(7))+31;print " "x($ARGV[0]-$_),"\e[1;${c};5m*"x($_*2-1),"\e[0m\n"}‘ 5
标签：perl
原文地址：http://liuyuan.blog.51cto.com/740753/1967199
