You could do this:

my $well;
foreach ( 1..$#derivative )
{
  $well = $derivative[ $_ ];

  # blah blah blah
}
[download]

-- JaWi

"A chicken is an egg's way of producing more eggs."