Skip to content

Instantly share code, notes, and snippets.

@bertmaher

bertmaher/tsv2csv.pl

Created July 26, 2017 05:08
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save bertmaher/246b177e7bfa04faf9719f52ea864aa0 to your computer and use it in GitHub Desktop.
Save bertmaher/246b177e7bfa04faf9719f52ea864aa0 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
tsv2csv.pl
#!/usr/bin/perl
while (<>) {
s/\015//g;
chomp;
my @a = split(/\t/, $_);
print(join(",", map { "\"$_\"" } @a), "\n");
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment