Lingua::FR::Numbers::Ordinate - Convert numbers into French ordinate adjectives.

NAME

Lingua::FR::Numbers::Ordinate - Convert numbers into French ordinate adjectives.

FUNCTION-ORIENTED INTERFACE

ordinate_fr( $number )

ordinate_fr_FR( $number )

 use Lingua::FR::Numbers::Ordinate qw(ordinate_fr);
 my $vingt  = ordinate_fr( 20 );
 print "Tintin est reporter au petit $vingt";

These two functions (which are the same at the moment) can be exported by the module. 


=cut

sub ordinate_fr { my $number = shift; my $locale = shift; return undef unless $number; my $num = Lingua::FR::Numbers::Ordinate->new($number) or return undef; $num->get_string( MODE => $locale ); }

sub ordinate_fr_FR { ordinate_fr( shift, 'fr_FR' ) or undef; }

OBJECT-ORIENTED INTERFACE

See Lingua::FR::Numbers for description of this interface. Lingua::FR::Numbers::Ordinate only modifies the get_string() method.

BUGS AND COMMENT

The sames as Lingua::FR::Number, and probably more.

http://rt.cpan.org/NoAuth/Bugs.html?Dist=Lingua-FR-Numbers

COPYRIGHTS

Copyright (c) 2002, Briac Pilpré. All rights reserved. This code is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

AUTHOR

Briac Pilpré <briac@cpan.org>

SEE ALSO

Lingua::FR::Numbers

 Lingua::FR::Numbers::Ordinate - Convert numbers into French ordinate adjectives.