On Wed, Dec 01, 1999 at 08:38:35PM -0600, Rick L. Mantooth wrote:
: #!/bin/sh
: # tabs.awk
: # Usage: cat Some_File | tabs.awk
You lose points for the spurious use of cat. :-) Double point loss for
invoking bash, then awk on top of that, rather than just
#!/usr/bin/awk -f
{gsub("\t","|",$0); print $0}
: # or cat Some_File | tabs.awk > New_File
: awk '{gsub("\t","|",$0); print $0}'
: #end tabs.awk
Not bad though.. :-) Try this on for size..
#!/usr/bin/perl
while(<>){s/\t/|/g;print;}
Invoke this as:
convert < infile > outfile
perl -e "print join q/ /,split(q/z/,reverse qq/rekcahzlrepzrehtonaztsuj/);"
--
Jason Costomiris <><
Technologist, cryptogeek, human.
jcostom {at} jasons {dot} org | http://www.jasons.org/
--
To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe"
as the Subject.
