Hmm, see splice for why that doesn't work. Here's the fix: print (splice @a, rand @a, 1);