perl -le '@a=1..1000;for(1..$#a){ $r=rand($_+1);@a[$_,$r]=@a[$r,$_]};print join"\n",@a'
アナログ、デジタルのツールを自在に使いこなしつつ、 それでいて誰でも手軽にできる「89の仕事ハック」を一挙公開! 「日経ビジネスアソシエ」の好評連載をまとめた1冊です。