Select Code to Download

#!/usr/bin/perl
use strict;
...
$dbh->disconnect();

print "Done.\n";

1. Debian 12.6
Perl            : 5.036000    (x86_64-linux-gnu-thread-multi)
...
DBD::mysql      : 4.023

3. Mysql Maxscale router

strace: Process 204408 attached                                       
+                                                                     
+                                                                 
restart_syscall(<... resuming interrupted read ...>) = 0              
+                                                                     
+                                                                 
...
close(3)                                = 0                           
+                                                                     
+                                                                 
write(1, "Done.\n", 6)                  = 6                
...