/[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

Annotation of /common.pm

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.1 - (hide 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 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