Select Code to Download

  ### Transaction starts
  my $dbh=DBI->connect(...);
...
  
       } using ($dbh);
  ### Transaction ends

  { # This code implement the transactionalize { ... } using ( dbh );
      my (@dbh_AO,$dbh_HRef,$error_E);
...
           };
  
       };