кривоглаз, а ткпрь и криворук:

AK666 20.05 20:20 / 20.05 20:22

handler.sh

#!/bin/sh
/srv/parser/current/parser3.cgi handler.p

handler.p

@main[][locals]

$stdintable[^table::create{line}]

^while(true){
  ^if(def $console:line){
    ^stdintable.append{$console:line}
  }{
    ^break[]
  }
}

^stdintable.foreach[pos;row]{
  $pos = $row.line
}[^#0A]

test.txt:

first line
sdfv
sadvf
sadfv
sdfv
dsfv(6)



sdv(10)
sadvf
sadfvs
fdv
f
sdvf(15)
totla: 6+3+6+1 = 16 lines

$ cat test.txt | ./handler.sh
$ ./handler.sh <test.txt

результат одинакв:

  0 = sdfv



  1 = sadfv



  2 = dsfv(6)



  3 =



  4 = sdv(10)



  5 = sadfvs



  6 = f



  7 = totla: 6+3+6+1 = 16 lines

А ГДЕ ОСТАЛЬНОЕ ??

---