diff options
author | Arnold D. Robbins <arnold@skeeve.com> | 2020-04-12 20:33:50 +0300 |
---|---|---|
committer | Arnold D. Robbins <arnold@skeeve.com> | 2020-04-12 20:33:50 +0300 |
commit | 3bf5a9b0c4e2e7f8d9ca37267e4f29775bb61129 (patch) | |
tree | 8125c145b5c54e7861ef30015accf31069386e74 /awklib/eg/misc/test-csv.awk | |
parent | 96656f01af15915c943865c8705bc7fc4a9ab436 (diff) | |
download | egawk-3bf5a9b0c4e2e7f8d9ca37267e4f29775bb61129.tar.gz egawk-3bf5a9b0c4e2e7f8d9ca37267e4f29775bb61129.tar.bz2 egawk-3bf5a9b0c4e2e7f8d9ca37267e4f29775bb61129.zip |
Add new sample files related to CSV parsing.
Diffstat (limited to 'awklib/eg/misc/test-csv.awk')
-rw-r--r-- | awklib/eg/misc/test-csv.awk | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/awklib/eg/misc/test-csv.awk b/awklib/eg/misc/test-csv.awk new file mode 100644 index 00000000..7dbf414c --- /dev/null +++ b/awklib/eg/misc/test-csv.awk @@ -0,0 +1,15 @@ +BEGIN { + fp[0] = "([^,]+)|(\"[^\"]+\")" + fp[1] = "([^,]*)|(\"[^\"]+\")" + fp[2] = "([^,]*)|(\"([^\"]|\"\")+\")" + FPAT = fp[fpat+0] +} + +{ + print "<" $0 ">" + printf("NF = %s ", NF) + for (i = 1; i <= NF; i++) { + printf("<%s>", $i) + } + print "" +} |