printf"$a[%d]\n", 4

##</code><code>##

perl -wle 'my @a=1..9; printf"\$a[%d]\n", 4'