...
my $data_file = "data.tsv";

my $s2 = "\copy (" . $tableName . ") FROM '" . $data_file . "'";
$dbh->do($s2);
...