iteration number

From: Jack (jaddo_at_yahoo.com.)
Date: 10/30/03 

Date: Wed, 29 Oct 2003 17:41:34 -0800

Hello
is there a perl default variable which holds the number of iteration for the
'foreach' statement
foreach my $key ( sort keys %data) {

thanks