Форум программистов [Powered by Invision Power Board]

MyISAM

1) если есть на странице несколько SQL запросов не оптимизированных, INSERT UPDATE, и если пользователь нажмет кпонку STOP в браузере, то возможно что часть SQL запросов не выполниться?

вот есть ссылка, но я пишу в catalyst и не понял что мне нужно добавить?
http://www.yaldex.com/perl-tutorial-3/0596002270_pmodperl-chp-6-sect-9.html

(как тут сделать обязательно ли форкать?)

2) вот эти запросы, возможно там можно как-то оптимизировать, но что-то не понимаю...
(оптимизировать delete можно в один запрос, но там где идет SELECT и UNION и DELETE - я не знаю как там сделать)
(сайт не нагруженный, сильную оптимизацию я не рассматиривал, она мне не нужна)

например:

Код



  my $sql_all = 'SELECT id_se
                              FROM section
                            WHERE id_un = '.$args[0];

     my $sth2 = $dbh->prepare($sql_all);
        $sth2->execute();  
        
        
    while ( my $id = $sth2->fetchrow_arrayref() ) {    

        my $sql_par = 'SELECT id_se
                              FROM section
                            WHERE
                    parent_se_id = '.$args[0].'
                      
                    UNION
                      
                    SELECT t1.id_se
                    FROM
                    section t1 JOIN section t2
             ON t1.parent_se_id = t2.id_se
                    WHERE
              t2.parent_se_id = '.$args[0];
        
     my $sth = $dbh->prepare($sql_par);
        $sth->execute();          
            
            while ( my $id = $sth->fetchrow_arrayref() ) {    
    
       
             $dbh->do( 'DELETE from section                         
                     WHERE id_se = '.$id->[0],
                 undef, undef );        
       
             $dbh->do( 'DELETE from comment                         
                     WHERE id_se = '.$id->[0],
                 undef, undef );
                 
             $dbh->do( 'DELETE from content                         
                     WHERE id_se = '.$id->[0],
                 undef, undef );                        
       
                }
                
           $sth->finish(); 
         

    }
         $sth2->finish(); 


            $dbh->do(
                qq{DELETE FROM  users                         
                      WHERE id = ? },
                undef, $args[0]
            );

            $dbh->do(
                qq{DELETE FROM  user_roles                        
                      WHERE user_id = ? },
                undef, $args[0]
            );

            $dbh->do(
                qq{DELETE FROM  content                         
                      WHERE id_un = ? },
                undef, $args[0]
            );

            $dbh->do(
                qq{DELETE FROM  comment                         
                      WHERE id_un = ? },
                undef, $args[0]
            );

            $dbh->do(
                qq{DELETE FROM  section                         
                      WHERE id_un = ? },
                undef, $args[0]
            );

мне в прошлый раз исправили:
(но тут другое по легче)

Код


                   'SELECT  dfgdg
                              FROM section
                            WHERE    id_se = ?
                            LIMIT 1';
                SELECT id_se
                              FROM section
                            WHERE
                    parent_se_id = ?
                      
                    UNION
                      
                    SELECT t1.id_se
                    FROM
                    section t1 JOIN section t2
             ON t1.parent_se_id = t2.id_se
                    WHERE
              t2.parent_se_id = ?

           # перебор всего, более 100 значение
            while ( ) {    

            'UPDATE section
                  SET '.$args[1].' = '.$section->[0].' 
                WHERE id_se = '.$email->[0]  , undef, undef );       
               }

на

Код


UPDATE section AS t4 LEFT JOIN section t2 ON t4.parent_se_id = t2.id_se
SET t4.active_se = 1 - t4.active_se
WHERE t2.parent_se_id = 54 or t4.parent_se_id = 54