http://qs321.pair.com?node_id=214798


in reply to Re: Need some data structures cooked
in thread Need some data structures cooked

Well cooked!  Oddly enough, all you need is:    splice @{$vips{$k}{'stack'}}, 0, -50; It will leave the array untouched if it is not greater than 50.
$ perldoc -f splice . . . If LENGTH is negative, leaves that many elements off the end of the + array.
(I guess they mean "off the deleted array" -- at all events, that's how it works (and also what makes sense).  It's explained clearly here!)

  p