perlfunc: replace splice example with simpler one

based on suggestions from Nicholas Clark and David Golden on
perl5-porters