Re: A tale of a programming conlanger
| From: | Charles <catty@...> |
|---|
| Date: | Tuesday, October 5, 1999, 7:52 |
|---|
Irina Rempt-Drijfhout wrote:
> My Perl is non-existent, and I'd like to have a version that also
> counts word-final letters and word-initial/word-final digraphs. I
> *think* it might be a simple matter of adding a line or two, but I
> don't know what or where. Please help!
Good estimate; 3 lines of code added.
Test data: "first second"
Result:
1 digraph f
1 digraph s
1 digraph co
1 digraph d
1 digraph ec
1 digraph fi
1 digraph ir
1 digraph nd
1 digraph on
1 digraph rs
1 digraph se
1 digraph st
1 digraph t
3 single
1 single c
1 single d
1 single e
1 single f
1 single i
1 single n
1 single o
1 single r
2 single s
1 single t
1 wf-digraph nd
1 wf-digraph st
1 wi-digraph fi
1 wi-digraph se
Sorry, couldn't resist the challenge. Uploaded to:
http://www.catty.com/~catty/lang/frq.pl