Select Code to Download

my $rv = $dbh->do($Command_B, {}, @CHOICE_B) or die "Couldn't do query
+: ".$dbh->errstr;