$dbh->do("UPDATE person SET nickname = 'one' WHERE id=1") or die "Could not execute #1: $DBI::errstr\n";

$dbh->do("UPDATE person SET nickname = 'two' WHERE id=1; UPDATE person SET nickname = 'three' WHERE id=1") or die "Could not execute #2: $DBI::errstr\n";