Adjacent item in a array

[Vino]

Hi All,

  Request you help on printing an array in below,

Eg:

Array ("T1", "T2", "T3", "T4", "T5")

Output required as below

T1,T2
T2,T3
T3,T4
T4,T5


From,
Vino.B