How to capitalize last character of a string?

[nix@xxxxxxxxxxxxxxxx]

Hi, as the subject says, any guidance?

TEST="word"

print "${(C)TEST[1]}$TEST[2,-1]"

Capitalizes the first character but somehow I could not come up with
solution other way.