Perl : 하나의 MySQL 호출로 다중 행을 업데이트하십시오.

Question

가능하지 않을 수도 있지만, 나도 물어 볼 수 있습니다. 잘못 될 수 있습니다. 어쨌든 perl이 한 번의 MySQL 호출을 사용하여 여러 행을 업데이트 할 것인지 궁금 해서요. DBI를 사용하고 있습니다.

도움이나 의견을 크게 주시면 고맙겠습니다. 이것은 ASP와 ASP.net을 통해 MSSQL에서 가능하므로 MySQL의 perl을 통해 가능한지 궁금합니다.

의견을 보내 주셔서 감사합니다.

Answer 1

가장 중요하고 중요한 것은 SQL 문자열에 변수를 직접 삽입해서는 안됩니다. 따라서 SQL 주입 공격 가능성이 열리게됩니다. 이러한 변수가 사용자 입력에서 비롯되지 않더라도 위험한 버그로 인해 데이터가 망가질 수 있습니다.

MySQL DBD 드라이버는 기본적으로 안전 기능으로 해제되어 있지만 여러 문을 지원합니다. DBD :: mysql 문서의 Class Methods 섹션 아래에있는 mysql_multi_statements을 참조하십시오.

그러나 두 가지 문제를 동시에 해결하고 더 이식성이 뛰어난 훨씬 더 나은 솔루션은 준비된 문과 자리 표시 자 값을 사용하는 것입니다.

while($whatever) { 
    my ($EC, $MR, $EM) = get_the_data(); 
    $sth->execute($EC, $MR, $EM); 
} 

당신은 한 번만 문을 준비해야하고, 자리 값이 대체 (제대로 인용 보장)된다하여 :

my $sth = $dbh->prepare("UPDATE LOW_PRIORITY TableName SET E1=?,F1=? WHERE X=?"); 

그리고, 어떤 종류의 루프에서 데이터를 얻을 DBD 드라이버

자리 표시 자에 대한 자세한 내용은 DBI docs을 참조하십시오.

Answer 2

friedo가 제안한 것처럼 mysql_multi_statements는 필요하지 않습니다.

당신은 당신이 당신의 UPDATE 명령이 포함 된 루프를 호출하기 전에 자동 커밋 모드를 해제해야합니다

귀하의 예제에서

**$dbh->{AutoCommit} = 0;** 
while($condition) { 
    my $myParam = something(); 
    ... 
    $sth->execute($myParam); #your prepared UPDATE statement 
    ... 
} 
**$dbh->commit();**