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