Parent Directory | Revision Log
moved common code to common.pl; added script to send invitation e-mails
1 | dpavlin | 1.1 | # this are common functions for all parts of wopi |
2 | # | ||
3 | |||
4 | # convert UTF8 (as from XML file) to 8-bit encoding | ||
5 | |||
6 | use Text::Iconv; | ||
7 | |||
8 | # output charset | ||
9 | my $charset='ISO-8859-2'; | ||
10 | |||
11 | Text::Iconv->raise_error(0); # Conversion errors raise exceptions | ||
12 | my $from_utf8 = Text::Iconv->new('UTF8', $charset); | ||
13 | sub x { | ||
14 | return $from_utf8->convert($_[0]); | ||
15 | } | ||
16 | |||
17 | 1; |
ViewVC Help | |
Powered by ViewVC 1.1.26 |