Perlよくわからん

うーーん、よくわからん

sample.sh

/Users/massat% perl -MData::Dumper -e 'my @array = [1,2,3]; foreach (@array) { warn Dumper $_ };' 
$VAR1 = [
          1,
          2,
          3
        ];

/Users/massat% perl -MData::Dumper -e 'my @array = (1,2,3); foreach (@array) { warn Dumper $_ };'
$VAR1 = 1;
$VAR1 = 2;
$VAR1 = 3;

何ができてるんだろ