the code is pasted in a forum reply by Carl B about 1/3 of the way down the
Mailing lists
Newsgroups
RFC archive