Perlについての質問箱 43箱目

Perlについての質問箱 43箱目at TECH

Perlについての質問箱 43箱目 - 暇つぶし2ch311:デフォルトの名無しさん
10/05/07 17:32:43
perl -e "print join',', map{(qw(foo bar baz))[$_],(split /,/, 'xxx,yyy,zzz')[$_]}(0..999);#十分に大きい値
foo,xxx,bar,yyy,baz,zzz
>>300よりはマシかなあ…

次ページ

続きを表示

1を表示