Acme::Sneeze - Bless you
package Your::Object; use Acme::Sneeze; package Others; my $object = Your::Object->new; $object->sneeze; # "bless you!" print ref($object); # will print "Others"
When you sneeze in America (or other English speaking countries), you'll be blessed. But the problem is that they say "Bless you" without the 2nd parameter: the package name.
So with Acme::Sneeze, your object will have sneeze method, and when you sneeze you'll be automatically blessed to the current package.
In Japan, sneezing twice implies that "someone is talking about you." I guess Acme::Sneeze should be localized to increment reference count of the object if the users locale is set to JP.
In Poland, the common response Sto lat translates as Hundred years, wishing hundred years of health to the sneezer. Acme::Sneeze should wrap CORE::time in Poland maybe.
More interesting stories about different reactions to sneezing in different countries are available at http://en.wikipedia.org/wiki/Sneeze
Tatsuhiko Miyagawa <email@example.com>
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.