splice() offset past end of array at foo.pl line 154 (#1)
    (W misc) You attempted to specify an offset that was past the end of
    the array passed to splice(). Splicing will instead commence at the end
    of the array, rather than past it. If this isn't what you want, try
    explicitly pre-extending the array by assigning $#array = $offset. See
    perlfunc/splice.