NAME

Pangloss::Language - a language in Pangloss.

SYNOPSIS

use Pangloss::Language qw( dirRTL dirLTR );
my $language = new Pangloss::Language();

$language->name( $text )
         ->iso_code( $text )
         ->direction( dirRTL )
         ->creator( $user )
         ->notes( $text )
         ->date( time )
         ->validate;

# catch Pangloss::Language::Errors

do { ... } if $language->is_ltr();

DESCRIPTION

This class represents a language in Pangloss.

It inherits from Pangloss::StoredObject::Common and Pangloss::Collection::Item.

EXPORTS

Exports two constants on request for use with language direction:

dir_LTR (left to right)
dir_RTL (right to left)

METHODS

$obj->iso_code()

set/get ISO code.

$obj->direction()

set/get language direction.

$bool = $obj->is_ltr(), $obj->is_rtl()

test if the language direction is the above.

AUTHOR

Steve Purkis <spurkis@quiup.com>

SEE ALSO

Pangloss, Pangloss::Language::Error, Pangloss::Languages