Fun with Boggle

I haven't written any Perl for fun in a while, but I recently  
entertained myself a bit by writing a Boggle puzzle solver in Ruby:

http://blog.footle.org/2007/12/05/cheating-for-fun/

I'm not sure if this particular puzzle has come up before in FWP, but  
I was curious as to how closely this yak could be shaved in Perl. I  
suspect Ton could do it in somewhere around 40 characters. Anyone  
interested?

Brad