（已搞定）求救：如何取每一行的第一个字符

mantou

事情比较急，现在不知到该如何取。

有一个文本，需要把每一行的第一个字符取出后，重新生成一个文件，行号与原来要保持一致。

Iambitious

cut --characters=1 filename >> newfilename

mantou

谢谢，小弟已经自己搞定了。虽然有点烦琐。呵呵

for i in `cat ../11.txt`; do aa=$i; expr substr $aa 1 1 >> ../11; done

troll

TIMTOWTDI (There's more than one way to do it.)

Iambitious

你这种做法，在某些情况下不符合要求，比如对于文件
1 2 3 4 5
6 7 8 9 10
你的程序输出是不正确的。