Select Code to Download

# grab the stuff from the database
my $sth = $DBH->prepare('
...
# prepare a data structure for HTML::Template
my $rows;
push @{$rows}, $_ while $_ = $sth->fetchrow_hashref();

# grab the stuff from the database
my $rows = $DBH->selectall_arrayref('
   select title, artist, album, year
   from songs', Slice => {} );