Just for sheer TIMTOWTDI:
@ARGV = @ARGV[2..$#ARGV];
# or for the paran paranoid:
@ARGV = (@ARGV)[(2..$#ARGV)];
... but i don't like copying the ARGV array back to itself.
More readable might be:
my $discard1 = shift;
my $discard2 = shift;
Out of curiosity, why would one even want to discard the
first two arguments like that anyway? Seems like a bad
idea in the first place.
Hmmmm ... sounds like time to pull out one of the
Getopt modules to me. ;)
jeffa
L-LL-L--L-LL-L--L-LL-L--
-R--R-RR-R--R-RR-R--R-RR
B--B--B--B--B--B--B--B--
H---H---H---H---H---H---
(the triplet paradiddle with high-hat)