perlの文字列の場合の配列

#!/usr/bin/perl

use strict;
use warnings;

my @box = ("kengo","manabu","taku","takeshi","hiroyuki");

foreach(@box){

print "$_\n";
}
~