in reply to removing rows from an array

# Here's the alphabet.
my @alphabet = 'A'..'Z';

# Remove 22 elements from @alphabet, starting at $alphabet[2].
splice(@alphabet, 2, 22);

# Now my dictionary-authoring project will take much less time!
print "$_\n" for @alphabet;

[download]
perl -E'sub Monkey::do{say$_,for@_,do{($monkey=[caller(0)]->[3])=~s{::}{ }and$monkey}}"Monkey say"->Monkey::do'

In Section Seekers of Perl Wisdom