16 lines
315 B
Awk
16 lines
315 B
Awk
# ftrans.awk --- handle datafile transitions
|
|
#
|
|
# user supplies beginfile() and endfile() functions
|
|
#
|
|
# Arnold Robbins, arnold@skeeve.com, Public Domain
|
|
# November 1992
|
|
|
|
FNR == 1 {
|
|
if (_filename_ != "")
|
|
endfile(_filename_)
|
|
_filename_ = FILENAME
|
|
beginfile(FILENAME)
|
|
}
|
|
|
|
END { endfile(_filename_) }
|