User::Identity — maintain info about a physical person
| Use Case | Command | Description |
|---|---|---|
| Create a new user identity | User::Identity->new( $name, %options ) | Create a user identity with optional attributes like firstname, surname, etc. |
| Get full name | $obj->fullName() | Returns full name, guessed from other components if not set explicitly. |
| Stringify identity | print $obj | Automatically calls fullName() when used as string. |
| Get age | $obj->age() | Calculates age from date of birth (integer, incremented on birthday). |
| Check gender | $obj->isMale() / isFemale() | Returns true if gender is determined (from explicit input or courtesy). |
| Get formal name | $obj->formalName() | Constructs formal name from courtesy, initials, prefix, surname, titles. |
| Get nickname | $obj->nickname() | Returns nickname (defaults to name if not set). |
User::Identity
is a User::Identity::Item
use User::Identity;
my $me = User::Identity->new
( 'john'
, firstname => 'John'
, surname => 'Doe'
);
print $me->fullName # prints "John Doe"
print $me; # same
The "User-Identity" distribution is created to maintain a set of informational objects which are related to one user. The "User::Identity" module tries to be smart providing defaults, conversions and often required combinations.
The identities are not implementing any kind of storage, and can therefore be created by any simple or complex Perl program. This way, it is more flexible than an XML file to store the data. For instance, you can decide to store the data with Data::Dumper, Storable, DBI, AddressBook or whatever. Extension to simplify this task are still to be developed.
If you need more kinds of user information, then please contact the module author.
Extends "DESCRIPTION" in User::Identity::Item.
$obj->stringification()
When an User::Identity is used as string, it is automatically translated into the fullName() of the user involved.
Example:
my $me = User::Identity->new(...)
print $me; # same as print $me->fullName
print "I am $me\n"; # also stringification
Extends "METHODS" in User::Identity::Item.
Extends "Constructors" in User::Identity::Item.
User::Identity->new( [$name], %options )
Create a new user identity, which will contain all data related to a single physical human being. Most user data can only be specified at object construction, because they should never change. A $name may be specified as first argument, but also as option, one way or the other is required.
| Option | Defined in | Default |
|---|---|---|
| birth | undef | |
| charset | $ENV{LC_CTYPE} | |
| courtesy | undef | |
| description | User::Identity::Item | undef |
| firstname | undef | |
| formal_name | undef | |
| full_name | undef | |
| gender | undef | |
| initials | undef | |
| language | 'en' | |
| name | User::Identity::Item | <required> |
| nickname | undef | |
| parent | User::Identity::Item | undef |
| prefix | undef | |
| surname | undef | |
| titles | undef |
Options:
birth => DATEcharset => STRINGcourtesy => STRINGdescription => STRINGfirstname => STRINGformal_name => STRINGfull_name => STRINGgender => STRINGinitials => STRINGlanguage => STRINGname => STRINGnickname => STRINGparent => OBJECTprefix => STRINGsurname => STRINGtitles => STRINGExtends "Attributes" in User::Identity::Item.
$obj->age() — Calculated from the date of birth to the current moment, as integer. On the birthday, the number is incremented already.$obj->birth() — Returns the date in standardized format: YYYYMMDD, easy to sort and select. This may return undef, even if the dateOfBirth() contains a value, simply because the format is not understood. Month or day may contain '00' to indicate that those values are not known.$obj->charset() — The user's preferred character set, which defaults to the value of LC_CTYPE environment variable.$obj->courtesy() — The courtesy is used to address people in a very formal way. Values are like "Mr.", "Mrs.", "Sir", "Frau", "Heer", "de heer", "mevrouw". This often provides a way to find the gender of someone addressed.$obj->dateOfBirth() — Returns the date of birth, as specified during instantiation.$obj->description() — Inherited, see "Attributes" in User::Identity::Item.$obj->firstname() — Returns the first name of the user. If it is not defined explicitly, it is derived from the nickname, and then capitalized if needed.$obj->formalName() — Returns a formal name for the user. If not defined as instantiation parameter, it is constructed from other available information, which may result in an incorrect or incomplete name. The result is built from "courtesy initials prefix surname title".$obj->fullName() — If this is not specified as value during object construction, it is guessed based on other known values like "firstname prefix surname". If a surname is provided without firstname, the nickname is taken as firstname. When a firstname is provided without surname, the nickname is taken as surname. If both are not provided, then the nickname is used as fullname.$obj->gender() — Returns the specified gender of the person, as specified during instantiation, which could be like 'Male', 'm', 'homme', 'man'. There is no smart behavior on this: the exact specified value is returned. Methods isMale(), isFemale(), and courtesy() are smart.$obj->initials() — The initials, which may be derived from the first letters of the firstname.$obj->isFemale() — See isMale(): return true if we are sure the user is a woman.$obj->isMale() — Returns true if we are sure that the user is male. This is specified as gender at instantiation, or derived from the courtesy value. Methods isMale and isFemale are not complementary: they can both return false for the same user, in which case the gender is undetermined.$obj->language() — Can contain a list or a single language name, as defined by the RFC. Examples are 'en', 'en-GB', 'nl-BE'. The default language is 'en' (English).$obj->name( [$newname] ) — Inherited, see "Attributes" in User::Identity::Item.$obj->nickname() — Returns the user's nickname, which could be used as username, e-mail alias, or such. When no nickname was explicitly specified, the name is used.$obj->prefix() — The words which are between the firstname (or initials) and the surname.$obj->surname() — Returns the surname of person, or undef if that is not known.$obj->titles() — The titles, degrees in education or of other kind. If these are complex, you may need to specify the formal name of the user as well, because smart formatting probably fails.Extends "Collections" in User::Identity::Item.
$obj->add($collection, $role) — Inherited, see "Collections" in User::Identity::Item.$obj->addCollection( $object | <[$type], %options> ) — Inherited, see "Collections" in User::Identity::Item.$obj->collection($name) — Inherited, see "Collections" in User::Identity::Item.$obj->parent( [$parent] ) — Inherited, see "Collections" in User::Identity::Item.$obj->removeCollection($object|$name) — Inherited, see "Collections" in User::Identity::Item.$obj->type()User::Identity->type() — Inherited, see "Collections" in User::Identity::Item.$obj->user() — Inherited, see "Collections" in User::Identity::Item.Extends "Searching" in User::Identity::Item.
$obj->find($collection, $role) — Inherited, see "Searching" in User::Identity::Item.$object is not a collection. — The first argument is an object, but not of a class which extends User::Identity::Collection.$type ($class). — Either the specified $type does not exist, or that module named $class returns compilation errors. If the type as specified in the warning is not the name of a package, you specified a nickname which was not defined. Maybe you forgot the require the package which defines the nickname.$class failed. — The $class did compile, but it was not possible to create an object of that class using the options you specified.$name — The collection with $name does not exist and can not be created.This module is part of User-Identity distribution version 1.01, built on February 11, 2022. Website: http://perl.overmeer.net/CPAN/
Copyrights 2003-2022 by [Mark Overmeer <markov AT cpan.org>]. For other contributors see ChangeLog.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See http://dev.perl.org/licenses/
Generated by phpman v4.9.26-1-g511901d · Markdown · JSON · MCP Author: Che Dong Under GNU General Public License
2026-08-07 17:56 @2600:1f28:365:80b0:18ab:df6:7e48:ac07
CrawledBy CCBot/2.0 (https://commoncrawl.org/faq/)
Enhanced by LLM: deepseek-v4-flash / taotoken.net / www.chedong.com - original format