Update: Ooops... Sorry, this was meant to be a Perl Meditation (or "guessing game", as belg4mit appropriately put it) rather than a question.