There is a Poetry BOT (written in Perl?) for sale here. But you will have to pay for it.
merlyn has an article on random sentence generator on his stonehendge site here. It generates interesting random sentences. Not peoms, but it is a good starting point.
I am thinking of writing a simple poetry bot for fun, just a proof of concept.
Comment on Re: Seeking Perl poetry code that writes poems
This is the same site which sells a perl de-obfuscator script for 25 USD, which as far as I can see does nothing else but inserting linefeeds after each ';', so I'd be careful about the poetry bot!
CountZero
"If you have four groups working on a compiler, you'll get a 4-pass compiler." - Conway's Law