my $sth = $dbl->prepare($command) ;
      $sth->execute() ;

      my @row = $sth->fetchrow_array ;
      $sth->finish ;