# for instance, a program producing tab-delimited output:
perl my_tsv.pl | psql -d dbname -c "copy mytable from stdin csv delimiter E'\t'"