Select Code to Download

sub get_items {
  my $category = shift;
...

  return @items;
}

print $items[$i]{time};
print "There are " . scalar(@items) . " items\n";
# etc..