question on foreach loop

[itshardtogetone]

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

Thanks

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

my @data = (1..10);

foreach (@data){
    splice @data,0,1;
    print "printing [EMAIL PROTECTED] = @data\n";
}

##### results ###########
printing @data = 2 3 4 5 6 7 8 9 10
printing @data = 3 4 5 6 7 8 9 10
printing @data = 4 5 6 7 8 9 10
printing @data = 5 6 7 8 9 10
printing @data = 6 7 8 9 10