question on foreach loop

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 \@data = @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

• question on foreach loop by itshardtogetone
• Re: question on foreach loop by J. Peng
• RE: question on foreach loop by Andrew Curry
• Re: question on foreach loop by Rob Dixon
• Re: question on foreach loop by Chas. Owens
• Re: question on foreach loop by Chas. Owens