perl-install/c/stuff.pm


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

package c::stuff; # $Id$

use strict;
use vars qw($VERSION @ISA);

require DynaLoader;

@ISA = qw(DynaLoader);
$VERSION = '0.01';
# perl_checker: EXPORT-ALL

c::stuff->bootstrap($VERSION);

sub from_utf8 { iconv($_[0], "utf-8", standard_charset()) }
sub to_utf8 { iconv($_[0], standard_charset(), "utf-8") }

1;