Re: ePerl and language-dependent output

[Stephan Petersen <nospam@thanx>]

> * with ePerl
>   <:
>     foreach (split("\n", qq/<get-var __languages>/)) {
>        my $slice = "LANG_" . $_;
>        $slice =~ tr/[a-z]/[A-Z]/;
>        print "[$slice:The current language is $_\n:$slice]";
>     }
>   :>
> 
> With the latter, you may define an hash array and prints a nice language
> name.

Yup, this one is excellent, just what I needed to produce
language-dependent output with ePerl :-)

Thanks again for your help!

Stephan


--
Stephan Petersen                           sp@gtt.lth.rwth-aachen.de

>-=-=-=- Visit GTT's Technical Thermochemistry Web Page at =-=-=-=-<
>-=-=-=-      http://gttserv.lth.rwth-aachen.de/gtt/       =-=-=-=-<

______________________________________________________________________
Website META Language (WML)                www.engelschall.com/sw/wml/
Official Support Mailing List                   sw-wml@engelschall.com
Automated List Manager                       majordomo@engelschall.com