Yet Another CPAN Grep

Mojo-SQLite ( D/DB/DBOOK/Mojo-SQLite-3.009.tar.gz, DBOOK, 2022; MetaCPAN )

Mojo-SQLite/t/database.t ( view source; MetaCPAN )

 my $dbh = $sql->max_connections(1)->db->dbh;
  is $sql->db->dbh, $dbh, 'same database handle';
  isnt $sql->db->dbh, $sql->db->dbh, 'different database handles';
  is $sql->db->dbh, $dbh, 'different

$dbh = $sql->db->dbh;
  is $sql->db->dbh, $dbh, 'same database handle';
  $sql->db->disconnect;
  isnt $sql->db->dbh, $dbh, 'different database handles';
};

subtest 'Statement cache' => sub {
  my $d

t 3 as three')->sth;
  is $db->query('select 3 as three')->sth,  $sth, 'same statement handle';
  isnt $db->query('select 4 as four')->sth, $sth, 'different statement handles';
  is $db->query('select