Select Code to Download

print encode("UTF-8", "$row[0]\t$row[1]\n");

binmode(STDOUT, ':encoding(UTF-8)');
print "$row[0]\t$row[1]\n";