Select Code to Download

use strict;
use warnings;
...
        ($out) = $sth->fetchrow_array;
        is ($val, $out, "Output value $out equals input value $val");
}

1..10
ok 1 - Table created
...
ok 9 - Select executed
ok 10 - Output value 1679971 equals input value 1679971
# Looks like you failed 1 test of 10.