my @type = (
  {
     name => 'PythonQuestions',
     data => [ '[PythonQuestions|Python Questions]', 318, 3, 10 ],
  },
  {
     name => 'OffTopics',
     data => [ '[OffTopics|Off Topic Post]', 500, 3, 10 ],
  },
  {
    name => 'notes',
    data => [ 'Notes', 283, 3, 20 ],
  },
);

for my $t( @type ) {
  print "$t->{name} -> $t->{data}[0]\n";
}