Select Code to Download

1.dat
1
...
36
35

  return sort { $a->{$key} <=> $b->{$key} } @$aref;

foreach my $c( &sortby($sort, \@all_hashes) ){
  print "<tr><td>$c->{'id'}</td>\n<td>$c->{'info'}</td>\n<td>$c->{'gra
+phics'}</td>\n<td>$c->{'friendly'}</td>\n<td>$c->{'techno'}</td>\n<td
+>$c->{'entertain'}</td>\n<td>$c->{'average'}</td>\n<td>$c->{'hits'}</
+td>\n</tr>";
}