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

  # blah blah blah
}