Mini Shell
Mini Shell
| Direktori : /usr/share/doc/gawk/examples/lib/ |
| Current File : //usr/share/doc/gawk/examples/lib/ftrans.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_) }