File: Unaccent.pm

package info (click to toggle)
libtext-unaccent-perl 1.08-1.3
  • links: PTS
  • area: main
  • in suites: bullseye, buster, sid, stretch
  • size: 640 kB
  • ctags: 254
  • sloc: ansic: 1,276; makefile: 49; perl: 12
file content (110 lines) | stat: -rw-r--r-- 2,676 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
#
# Copyright (C) 2000, 2001, 2002 Loic Dachary <loic@senga.org>
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
#
package Text::Unaccent;

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

require Exporter;
require DynaLoader;

@ISA = qw(Exporter DynaLoader);
@EXPORT = qw(
unac_string unac_string_utf16 unac_version unac_debug
);
$VERSION = '1.08';

bootstrap Text::Unaccent $VERSION;

1;
__END__

=head1 NAME

Text::Unaccent - Remove accents from a string

=head1 SYNOPSIS

  use Text::Unaccent;

  $unaccented = unac_string($charset, $string);
  $unaccented = unac_string_utf16($string);
  $version = unac_version();
  unac_debug($level);

=head1 DESCRIPTION

Text::Unaccent is a module that remove accents from a string.
C<unac_string> converts the input string from the
specified  charset to UTF-16 and call 
C<unac_string_utf16> to
return the unaccented equivalent. The conversion from  and
to  UTF-16  is  done  with iconv(1).

=head1 METHODS

=over 4

=item $unaccented = unac_string($charset, $string)

Return the unaccented equivalent of the  string
C<$string>. The character set of 
C<$string> is specified by the 
C<$charset> argument. The returned string is coded using
the same character set. Valid values for the 
C<$charset> argument are character sets known by 
iconv(1). Under GNU/Linux try C<iconv -l> for 
a complete list.

=item $unaccented = unac_string_utf16($string)

Return the unaccented equivalent of the  string
C<$string>. The character set of 
C<$string> must be UTF-16.

=item $version = unac_version()

Return the version of the unac library used by this
perl module.

=item unac_debug($level)

Set the debug level. Messages are printed on stderr.
Possible debug levels are:

=over 4
=item $Text::Unaccent::DEBUG_NONE
Silent.
=item $Text::Unaccent::DEBUG_LOW
Human readable messsages.
=item $Text::Unaccent::DEBUG_HIGH
Detailed and very verbose information.
=back 

=back 

=head1 AUTHOR

Loic Dachary (loic@senga.org)
http://www.senga.org/unac/

=head1 SEE ALSO

iconv(1), unac(3).

=cut