diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2014-04-11 07:44:22 +0300 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2014-04-11 07:44:22 +0300 |
| commit | ebb6772e9eabeb81e3cc9305a6bec7adf7aad450 (patch) | |
| tree | 2cf743f82791db19cc7e31cab86b1fc9a4d5ddbb /test/readfile2.awk | |
| parent | e069c636968370f0899d5e4ebaeb9c2341804245 (diff) | |
| parent | a4b59faf911743b30f2e6e979c4f9c1ea0669ac3 (diff) | |
| download | egawk-ebb6772e9eabeb81e3cc9305a6bec7adf7aad450.tar.gz egawk-ebb6772e9eabeb81e3cc9305a6bec7adf7aad450.tar.bz2 egawk-ebb6772e9eabeb81e3cc9305a6bec7adf7aad450.zip | |
Merge branch 'master' into comment
Diffstat (limited to 'test/readfile2.awk')
| -rw-r--r-- | test/readfile2.awk | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/test/readfile2.awk b/test/readfile2.awk new file mode 100644 index 00000000..c21483fc --- /dev/null +++ b/test/readfile2.awk @@ -0,0 +1,12 @@ +@load "readfile" +BEGIN { PROCINFO["readfile"] = 1 } +BEGINFILE { print "Start of", basename(FILENAME) } +{ printf ("%d: <%s>\n", FNR, $0 ) } +ENDFILE { print "End of", basename(FILENAME) } + +function basename(file, result) +{ + result = file + gsub(".*/", "", result) + return result +} |