Personally I would do a hash, but the only reason that this isn't working for you is because you're not setting up @scoring up properly. Using the qw operater there is equivalent to

@scoring = ('$Acount', '$Bcount', ...etc);
[download]

which means that $Acount and company don't get interpreted as variables, but as literal strings. The code you've got will work with

@scoring = ($Acount, $Bcount, ...etc);
[download]