#!/usr/bin/gawk -f

BEGIN {
 ORS = OFS = ""
 RS = "\0\0"
 FS = "<!no!exist!>"
}

BEGINFILE { i = ARGIND }

{ s = s $0 RT }

ENDFILE {
 if ( s ~ /\n$/ ) {
  f = ARGV[ i ]
  print substr( s , 1 , length( s ) -1 ) >f
  close( f )
 }
 s = ""
}
