my $sth = $dbh->prepare('update data_set2 
                         set data = ? where key2 = ?');
$sth->execute($val1, $key);