#!/usr/bin/env perl use strict; use warnings; use SQL::Abstract; use DBD::mysqlPP; use Data::Dumper; my $dsn = "dbi:mysqlPP:database=$database;host=$hostname"; my $dbh = DBI->connect($dsn,$user,$pass); my $sql = SQL::Abstract->new; my ($stmt,@bind) = $sql->select('quarterbacks'); my $sth = $dbh->prepare($stmt); $sth->execute(@bind); my $results = $sth->fetchall_arrayref({});