1moniker(3) User Contributed Perl Documentation moniker(3)
2
3
4
6 UNIVERSAL::moniker
7
9 use UNIVERSAL::moniker;
10
12 Class names in Perl often don't sound great when spoken, or look good
13 when written in prose. For this reason, we tend to say things like
14 "customer" or "basket" when we are referring to
15 "My::Site::User::Customer" or "My::Site::Shop::Basket". We thought it
16 would be nice if our classes knew what we would prefer to call them.
17
18 This module will add a "moniker" (and "plural_moniker") method to
19 "UNIVERSAL", and so to every class or module.
20
21 moniker
22 $ob->moniker;
23
24 Returns the moniker for $ob. So, if $ob->isa("Big::Scary::Animal"),
25 "moniker" will return "animal".
26
27 plural_moniker
28 $ob->plural_moniker;
29
30 Returns the plural moniker for $ob. So, if
31 $ob->isa("Cephalopod::Octopus"), "plural_moniker" will return
32 "octopuses".
33
34 (You need to install Lingua::EN::Inflect for this to work.)
35
37 Marty Pauley <marty+perl@kasei.com>, Tony Bowden <tony@kasei.com>,
38 Elizabeth Mattijsen <liz@dijkmat.nl>
39
40 (Yes, 3 authors for such a small module!)
41
43 Copyright (C) 2004 Kasei
44
45 This program is free software; you can redistribute it under the same terms as
46 Perl.
47
48 This program is distributed in the hope that it will be useful, but WITHOUT
49 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
50 FOR A PARTICULAR PURPOSE.
51
52
53
54perl v5.32.0 2020-07-28 moniker(3)