my %settings;
while ((undef, my ($name, $value)) = $sql->fetchrow_array()) {
    $settings{$name} = $value;
}
##</code><code>##

        my %settings;
        while ((my ($tmp,$name, $value)) = $sql->fetchrow_array()) {
        $settings{$name}=$value;
        }
        $sql->finish();
        print $lastlog."\n";