超〜〜〜小ネタです. Perlにはsplitという関数がありまして, 次のように使えます: my @list = split(/,/, "a,b,c"); # @list = ('a', 'b', 'c'); 第1引数に正規表現を, 第2引数に文字列を渡すと, 第2引数の文字列を第1引数の正規表現にマッチした部分で分割…