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_) }
|