This is how I would do it, but there could very possibly be a better way to do it.

@temp_array = <PERSON>; #assign the information to a temporary array
push @cinfo, shift @temp_array; #add the first element to @cinfo
push @cinfo, '0', @temp_array; #add 0 & the rest to @cinfo
[download]

- p u n k k i d
"Reality is merely an illusion, albeit a very persistent one." -Albert Einstein