man UNIVERSAL::moniker () - UNIVERSAL::moniker

NAME

UNIVERSAL::moniker

SYNOPSIS

  use UNIVERSAL::moniker;

DESCRIPTION

Class names in Perl often don't sound great when spoken, or look good when written in prose. For this reason, we tend to say things like customer or basket when we are referring to CWMy::Site::User::Customer or CWMy::Site::Shop::Basket. We thought it would be nice if our classes knew what we would prefer to call them.

This module will add a CWmoniker (and CWplural_moniker) method to CWUNIVERSAL, and so to every class or module.

moniker

  $ob->moniker;

Returns the moniker for CW$ob. So, if CW$ob->isa(Big::Scary::Animal), CWmoniker will return animal.

plural_moniker

  $ob->plural_moniker;

Returns the plural moniker for CW$ob. So, if CW$ob->isa(Cephalopod::Octopus), CWplural_moniker will return octopuses.

(You need to install Lingua::EN::Inflect for this to work.)

AUTHORS

Marty Pauley <marty+perl@kasei.com>, Tony Bowden <tony@kasei.com>, Elizabeth Mattijsen <liz@dijkmat.nl>

(Yes, 3 authors for such a small module!)

COPYRIGHT

  Copyright (C) 2004 Kasei


  This program is free software; you can redistribute it under the same terms as
  Perl.


  This program is distributed in the hope that it will be useful, but WITHOUT
  ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
  FOR A PARTICULAR PURPOSE.