File: getlnbuf.awk

package info (click to toggle)
goawk 1.29.0-1
  • links: PTS, VCS
  • area: main
  • in suites: sid, trixie
  • size: 10,560 kB
  • sloc: awk: 3,060; yacc: 198; fortran: 189; python: 131; sh: 58; makefile: 12
file content (18 lines) | stat: -rw-r--r-- 502 bytes parent folder | download | duplicates (13) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
#Date: Tue, 21 Dec 1999 16:11:07 +0100
#From: Daniel Schnell <Daniel.Schnell.GP@icn.siemens.de>
#To: bug-gnu-utils@gnu.org
#CC: arnold@gnu.org
#Subject: BUG in gawk (version 3.0.4 linux, windows): Text mangeling in between

# search for "@K@CODE" segment

$0 ~ /@K@CODE/  {
                # get next record
                getline temp
                printf ("@K@CODE\n")
                printf ("%s\n",temp)
                }

$0 !~ /@K@CODE/ {
                printf ("%s\n", $0)
                }