View on
MetaCPAN is shutting down
For details read Perl NOC. After June 25th this page will redirect to
Mark Blythe > HTML-Chunks-1.55.1 > HTML::Chunks::Local



Annotate this POD


New  1
Open  0
View/Report Bugs
Module Version: 1.02   Source  


HTML::Chunks::Local - A simple localization layer for HTML::Chunks




This subclass of HTML::Chunks is geared for sites which deliver multi-lingual content. This works by making chunks that have a similar name but with a language or country code appended to the name (e.g. chunk_en) in your template files. When you call output(), you pass in an array reference which contains the user's language preference(s) after the chunk name. The subclass goes through that list, followed by default language codes, and finally tries no language code to find the most appropriate chunk to output. Simple.


 use HTML::Chunks::Local;
 $chunks = new HTML::Chunks::Local('chunkfile.html');
 $chunks->output('sample_chunk', [pt, sp], @data);


my $chunks = new HTML::Chunks::Local('chunkfile.html');

Create a new Chunks instance, and load up any chunk files supplied.

$chunks->output('chunkid', \@languagepref, ... );

Same as HTML::Chunks->output(), but requires an array ref with the user's language preference(s).


Accessor methods to set and retrieve the default language list. Note that is expects and returns array references.


Returns an array reference with a best guess language list. This expects to see typical HTTP header for language with country code (e.g. en-us), and returns a list of probable fallbacks, like [en_us, en]. Note that it converts the '-' into a more easily used '_', though it will accept any non-alpha character as a language/country spearator. This sub can be made to be much more intelligent, but this is a nice 80/20 solution for now.


Created, developed and maintained by Mark W Blythe and Dave Balmer, Jr. Contact or for comments or questions.


(C)2001-2004 Mark W Blythe and Dave Balmer Jr, all rights reserved. This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

syntax highlighting: