my $sClassScoresQuery = qq/SELECT ? FROM $exportDb->{pagesTable} WHERE id=?/; my $stPageClassScores = $exportDb->{dbh}->prepare($sClassScoresQuery); my $newClassScore = 0; for my $className (keys $hrClassName2Id){ my $classColumnName = $className . "_score"; my $classId = $hrClassName2Id->{$className}; my @aTemp; for my $id (@pageTableAutoIncrementIds){ #prepare here... for debugging purposes only! #my $sQuery = qq/SELECT $classColumnName FROM $exportDb->{pagesTable} WHERE id = $id/; #my $stDebug = $exportDb->{dbh}->prepare($sQuery); $stPageClassScores->execute($exportDb->{dbh}->quote_identifier($classColumnName), $id); #$stDebug->execute(); while (my @res = $stPageClassScores->fetchrow_array()){ #while (my @res = $stDebug->fetchrow_array()){ push @aTemp, $res[0]; } } #some other stuff happens here... } #### bind_param(1, $classColumnName); bind_param(2, $id)