> If I remove the braces from (\$1, \$2, \$3) then it gives below error. > > my $query = (<<ENDQUERY); > INSERT INTO changelogtest(id, txid, txtime) > SELECT \$1, \$2, \$3 > EXCEPT > SELECT (id, txid, txtime) > FROM changelogtest > WHERE id = \$1 > AND txid = \$2 > AND txtime = \$3; > ENDQUERY > > techdb=# SELECT insert_history_info(); > ERROR: error from Perl function "insert_history_info": each EXCEPT query must have the same number of columns at line 15.
Yes of course, your select lists are different. Try:
> my $query = (<<ENDQUERY); > INSERT INTO changelogtest(id, txid, txtime) > SELECT \$1, \$2, \$3 > EXCEPT > SELECT id, txid, txtime > FROM changelogtest > WHERE id = \$1 > AND txid = \$2 > AND txtime = \$3; > ENDQUERY
Alban Hertroys
-- If you can't see the forest for the trees, cut the trees and you'll see there is no forest.