Select Code to Download

        my $sth21= $dbh->prepare(qq{SELECT MR_M FROM MR2});
        die "Couldn't prepare queries; aborting"
...
for (my $i=0; $i<@mr_m; $i++)   {
        print "$mr_m[$i]\t $mr_r[$i]\n";
}

mysql> select * from MR2 limit 10;
+-----------+--------+
...
+-----------+--------+
10 rows in set (0.00 sec)

M13470333        RL2591
M13470334        RL2590
...
M13470346        RL2579
M13470347        RL2578