$"=",\n";
print "(@{[map {chomp; qq|'$_'|} <>]})\n";