$randstring .= splice(@testarray, int rand @testarray, 1)