Wie bestimmt man die Mysql-Verbindungs-ID in Perl?

Question

Ich versuche zu verstehen, ob meine Module eine DBI-Verbindung zu MySQL haben oder nicht. Ich würde gerne ihre Verbindungs-ID bestimmen. Es gibt vielleicht bessere Lösungen (und ich möchte sie wissen), aber die erste Frage ist immer noch zu wissen, Verbindungs-ID.

Answer 1

Sie können die CONNECTION_ID Funktion, z.B.:

my ($id) = $dbh->selectrow_array('SELECT CONNECTION_ID()');

Answer 2

Sie können auch dies versuchen, da Sie MySQL erwähnen

my $threadId = $dbmyh->{ q{mysql_thread_id} };

En DBD::mysql-Dokumentation