my %chart = (
  name => 'vote',
  data => get_vote_data(), # assumed to return a scalar
  colors => join(',', 'red', 'green', 'blue'),
  shape => 'bar',
);

print $chart{name}, "\n";   # 'vote'
print $chart{colors}, "\n"; # 'red,green,blue'