/[wopi]/common.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Contents of /common.pm

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.1 - (show annotations)
Thu Apr 24 17:55:17 2003 UTC (20 years, 11 months ago) by dpavlin
Branch: MAIN
CVS Tags: HEAD
moved common code to common.pl; added script to send invitation e-mails

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