Perhaps you haven't realized, but PM is an educational institution; not a code factory that automagically hands out free samples. While we sometimes do your work for you, we're far more apt -- and often, more able -- to help if you show that you've made some effort. In cases like yours, that means: show us what you've tried, and be a bit more specific if you can: what isn't doing what you expect or want.

So, please read How do I post a question effectively?; then post your code (as an update to the above).

And welcome to the Monastery, with this hint: check out the Encode::... family.