Here are three possible ways:
` # Use a sentinel variable
my $first;
foreach my $well (@derivative) {
next unless $first++;
# Do something
}
# Use an array slice
foreach my $well (@derivative[1..$#derivative]) {
# Do something
}
# Use the array indices
foreach my $i (1..$#derivative) {
my $well = $derivative[$i];
# Do something
}
`
--
John.
| [reply] [d/l] |

`my $tmp = shift@derivative;
for my $well (@derivative) {
#
}
unshift @derivative, $tmp;
`
| [reply] [d/l] |

`for my $well (splice @derivative, 1, @derivative) {
#
}
`
Cheers, -- Dave :-)
$q=[split+qr,,,q,~swmi,.$,],+s.$.Em~w^,,.,s,.,$&&$$q[pos],eg,print
| [reply] [d/l] |

or the destructive and funky version of your code ;-)
`for ( do {shift @derivative; @derivative} ) {
#
}
`
-- Hofmator | [reply] [d/l] |

You may a) use a flag variable b) omit foreach(@array) in favour of foreach(0 .. @array-1) or you could c) use a slice:
`foreach my $well ( @derivate[ 0 .. @derivate-1 ] ){ ...
`
As you like it.
--
http://fruiture.de | [reply] [d/l] |

`my $well;
foreach ( 1..$#derivative )
{
$well = $derivative[ $_ ];
# blah blah blah
}
`
Hope it helps,
-- JaWi
"A chicken is an egg's way of producing more eggs." | [reply] [d/l] |

Hi.
There are a couple of different ways, depending on your particular favourite style. Once way is shown below.
`foreach my $well (@derivative[1..$#derivative]) {
# blah blah blah
}
`
Hope that helps
Cheers, -- Dave :-)
$q=[split+qr,,,q,~swmi,.$,],+s.$.Em~w^,,.,s,.,$&&$$q[pos],eg,print
| [reply] [d/l] |

Comment onignoring the first element of an arraySelectorDownloadCode