$b = 0;
 while ( @slog = $sth->fetchrow_array ) {
    $b++;
    $info = param($b);
    ($a,$b) = split(/=/, $info);
    push(@info,$b)
 }