github.com/benhoyt/goawk@v1.8.1/testdata/gawk/getlnbuf.awk (about)

     1  #Date: Tue, 21 Dec 1999 16:11:07 +0100
     2  #From: Daniel Schnell <Daniel.Schnell.GP@icn.siemens.de>
     3  #To: bug-gnu-utils@gnu.org
     4  #CC: arnold@gnu.org
     5  #Subject: BUG in gawk (version 3.0.4 linux, windows): Text mangeling in between
     6  
     7  # search for "@K@CODE" segment
     8  
     9  $0 ~ /@K@CODE/  {
    10                  # get next record
    11                  getline temp
    12                  printf ("@K@CODE\n")
    13                  printf ("%s\n",temp)
    14                  }
    15  
    16  $0 !~ /@K@CODE/ {
    17                  printf ("%s\n", $0)
    18                  }