| Filename | /usr/lib/perl5/Text/Unaccent.pm |
| Statements | Executed 13 statements in 263µs |
| Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
|---|---|---|---|---|---|
| 1 | 1 | 1 | 64µs | 64µs | Text::Unaccent::bootstrap (xsub) |
| 1 | 1 | 1 | 31µs | 39µs | Text::Unaccent::BEGIN@20 |
| 1 | 1 | 1 | 19µs | 128µs | Text::Unaccent::BEGIN@21 |
| Line | State ments |
Time on line |
Calls | Time in subs |
Code |
|---|---|---|---|---|---|
| 1 | # | ||||
| 2 | # Copyright (C) 2000, 2001, 2002 Loic Dachary <loic@senga.org> | ||||
| 3 | # | ||||
| 4 | # This program is free software; you can redistribute it and/or modify | ||||
| 5 | # it under the terms of the GNU General Public License as published by | ||||
| 6 | # the Free Software Foundation; either version 2 of the License, or | ||||
| 7 | # (at your option) any later version. | ||||
| 8 | # | ||||
| 9 | # This program is distributed in the hope that it will be useful, | ||||
| 10 | # but WITHOUT ANY WARRANTY; without even the implied warranty of | ||||
| 11 | # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | ||||
| 12 | # GNU General Public License for more details. | ||||
| 13 | # | ||||
| 14 | # You should have received a copy of the GNU General Public License | ||||
| 15 | # along with this program; if not, write to the Free Software | ||||
| 16 | # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. | ||||
| 17 | # | ||||
| 18 | package Text::Unaccent; | ||||
| 19 | |||||
| 20 | 3 | 60µs | 2 | 46µs | # spent 39µs (31+7) within Text::Unaccent::BEGIN@20 which was called:
# once (31µs+7µs) by C4::Members::BEGIN@42 at line 20 # spent 39µs making 1 call to Text::Unaccent::BEGIN@20
# spent 7µs making 1 call to strict::import |
| 21 | 3 | 125µs | 2 | 238µs | # spent 128µs (19+110) within Text::Unaccent::BEGIN@21 which was called:
# once (19µs+110µs) by C4::Members::BEGIN@42 at line 21 # spent 128µs making 1 call to Text::Unaccent::BEGIN@21
# spent 110µs making 1 call to vars::import |
| 22 | |||||
| 23 | 1 | 1µs | require Exporter; | ||
| 24 | 1 | 2µs | require DynaLoader; | ||
| 25 | |||||
| 26 | 1 | 25µs | @ISA = qw(Exporter DynaLoader); | ||
| 27 | 1 | 2µs | @EXPORT = qw( | ||
| 28 | unac_string unac_string_utf16 unac_version unac_debug | ||||
| 29 | ); | ||||
| 30 | 1 | 800ns | $VERSION = '1.08'; | ||
| 31 | |||||
| 32 | 1 | 35µs | 1 | 661µs | bootstrap Text::Unaccent $VERSION; # spent 661µs making 1 call to DynaLoader::bootstrap |
| 33 | |||||
| 34 | 1 | 12µs | 1; | ||
| 35 | __END__ | ||||
# spent 64µs within Text::Unaccent::bootstrap which was called:
# once (64µs+0s) by DynaLoader::bootstrap at line 215 of DynaLoader.pm |