shiftに配列を渡すと、配列の先頭の要素を取り出して、配列の要素をひとつずつ前にずらす。shift関数 - 配列/リスト - Perl関数のリファレンスまず、リストで配列を初期化し、配列の要素をfor文で出力。 shiftで取り出した要素を$strに格納し出力。 ふたたび…