diff options
| author | Tom Ryder <tom@sanctum.geek.nz> | 2016-12-01 10:19:44 +1300 |
|---|---|---|
| committer | Tom Ryder <tom@sanctum.geek.nz> | 2016-12-01 10:19:44 +1300 |
| commit | 29b2e4aef88865bacc251d75f7a33ae6da34b770 (patch) | |
| tree | 2180fd2245f6bdc2391ac0f02d368a8bf2b81aba /bin | |
| parent | Update submodules (diff) | |
| download | dotfiles-29b2e4aef88865bacc251d75f7a33ae6da34b770.tar.gz dotfiles-29b2e4aef88865bacc251d75f7a33ae6da34b770.zip | |
Add csmw(1df)
Diffstat (limited to 'bin')
| -rw-r--r-- | bin/csmw.awk | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/bin/csmw.awk b/bin/csmw.awk new file mode 100644 index 00000000..b1cd20cb --- /dev/null +++ b/bin/csmw.awk @@ -0,0 +1,14 @@ +# Print an English comma-separated list of monospace-quoted words (backticks) +{ + for (i = 1; i <= NF; i++) + ws[++wc] = $i +} +END { + if (wc > 2) + for (i = 1; i <= wc; i++) + printf (i < wc) ? "`%s`, " : "and `%s`\n", ws[i] + else if (wc == 2) + printf "`%s` and `%s`\n", ws[1], ws[2] + else if (wc == 1) + printf "`%s`\n", ws[1] +} |