-package Lyrical::Loc;
+package Lirama::Loc;
use strict;
use warnings;
our @EXPORT = qw(langpref);
our @EXPORT_OK = qw(@langpref loc);
-our @langpref = qw(en eo nl sv de fr ru kr);
+our @langpref = qw(en eo nl sv el hu de fr ru kr fi);
sub langpref {
# @_ is order of languages (prefered language last)
1;
+__END__
+
+
=head1 NAME
-Lyrical::Loc - Localize strings
+Lirama::Loc - Localize strings
=head1 SYNOPSIS
- use Lyrical::Loc;
- langpref(qw/en eo/);
- tie my %loc, "Lyrical::Loc", {
+ use Lirama::Loc;
+
+ langpref(qw/en eo/); # prefer esperanto texts
+
+ tie my %loc, "Lirama::Loc", {
test => {
en => "this is a test",
eo => "cxi tio estas testo",
=head1 DESCRIPTION
+Returns a text in the preferred language.
+
+=head1 SEE ALSO
+
+L<Locale::Maketext|Locale::Maketext>
+
=head1 AUTHOR
-Mischa Poslawsky <shiar@shiar.org>
+Mischa POSLAWSKY <shiar@shiar.org>
+
+Copyright 2005 Mischa POSLAWSKY. All rights reserved.
=cut