Perlで400文字や300文字や20文字の配列の中から50文字だけ取り出して
表示するにはどうすればいいんだろうか(;´Д`)20文字の場合は20文字だけでいい