question on foreach loop

------=_NextPart_000_0003_01C8ABD8.E15133A0
Content-Type: text/plain;
	charset="gb2312"
Content-Transfer-Encoding: quoted-printable

Hi Members,
Can someone explain why the foreach loop did not iterate 10 times.

Thanks

#################
use strict;
use warnings;

my @[EMAIL PROTECTED]
 =3D (1..10);

foreach (@[EMAIL PROTECTED]
){
    splice @[EMAIL PROTECTED]
    print "printing \@[EMAIL PROTECTED]
 =3D @[EMAIL PROTECTED]
";
}

##### results ###########
printing @[EMAIL PROTECTED]
 =3D 2 3 4 5 6 7 8 9 10
printing @[EMAIL PROTECTED]
 =3D 3 4 5 6 7 8 9 10
printing @[EMAIL PROTECTED]
 =3D 4 5 6 7 8 9 10
printing @[EMAIL PROTECTED]
 =3D 5 6 7 8 9 10
printing @[EMAIL PROTECTED]
 =3D 6 7 8 9 10    
------=_NextPart_000_0003_01C8ABD8.E15133A0--