Simple Data Access

Get a list of hashrefs...


  my $sql    = "SELECT * FROM PriceHistory WHERE Ticker = 'YHOO'";
  my @prices = $db->Hashes($sql);

  foreach my $day (@prices)
  {
      print "$day->{Date}: $day->{Open}, $day->{Close}\n";
  }

  __END__


It's that easy!