torlee 发表于 2018-8-30 10:20:47

perl打印炫酷的等边三角形

　　看到首页上推荐《十分钟完成Bash脚本进阶！列举Bash的经典用法及其案例》
　　http://os.51cto.com/art/201709/552109.htm
　　然后用perl写了一个等边三角形的命令，参数是行数
perl -e 'for (1..$ARGV){$c=int(rand(7))+31;print " "x($ARGV-$_),"\e


页: [1]
查看完整版本: perl打印炫酷的等边三角形