i am new to perl. At first glance, i was only able to understand your Solution 1. Rest i am still trying to figure out...

howz little Albert doing, congrats...

thanks for all perl monks