foreach $key (@a)

##</code><code>##

${$key}[0]