in reply to regular expression matching array name

/\$(\w+)(?:\[\w+\])/

In Section Seekers of Perl Wisdom