PEWPS

gistfile1.txt

#!/usr/bin/perl -sw

while (<>) {
    foreach 
    $_ =~ s/,/\t/; 
    print "$_\n" if (eof);
}

user@localhost:~/work.dir/PerlScripts>cat ~/work.dir/Sasha/Expression\ Data/Homo_sapiens/aba_maoa/Columns.csv | perl replacer.pl
syntax error at replacer.pl line 5, near "$_ =~"
Execution of replacer.pl aborted due to compilation errors.
[2]-  Done                    emacs merge.basedOn.column.pl
user@localhost:~/work.dir/PerlScripts>