$db->select( $sql, sub {
    my ($sth) = @_;
    use Data::Dumper;
    print "I received the following statement handle: ";
    print Dumper $sth->fetchall_arrayref;
});