2009-07-23 七色のワンライナー Perl OneLiner perl -e'printf"\e[%dm%s\e[m%c",30+rand 8,chr 32+rand 95while 1'実は8色つかってるけど。 こんだけ。 追記 4年半の時を経て、改良のアドバイスいただきました。 すぎゃーんのやつ、xterm-256 に対応させたほうが色鮮かだしモテるとおもいます perl -e'printf"\e[38;5;%dm%s\e[m%c",16+rand 216,chr 32+rand 95 while 1'2014-02-20 16:00:04 via TweetDeck