Profile: /opt/wise/lib/perl5/5.10.0/locale.pm

Subroutines — ordered by exclusive time
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
1	1	1	1.1e-5	1.1e-5	locale::	import
1	1	1	8.0e-6	8.0e-6	locale::	unimport

Line	Stmts.	Exclusive Time	Avg.	Code
1				package locale;
2
3	1	1.0e-6	1.0e-6	our $VERSION = '1.00';
4
5				=head1 NAME
6
7				locale - Perl pragma to use and avoid POSIX locales for built-in operations
8
9				=head1 SYNOPSIS
10
11				@x = sort @y; # ASCII sorting order
12				{
13				use locale;
14				@x = sort @y; # Locale-defined sorting order
15				}
16				@x = sort @y; # ASCII sorting order again
17
18				=head1 DESCRIPTION
19
20				This pragma tells the compiler to enable (or disable) the use of POSIX
21				locales for built-in operations (LC_CTYPE for regular expressions, and
22				LC_COLLATE for string comparison). Each "use locale" or "no locale"
23				affects statements to the end of the enclosing BLOCK.
24
25				See L<perllocale> for more detailed information on how Perl supports
26				locales.
27
28				=cut
29
30	1	1.0e-6	1.0e-6	$locale::hint_bits = 0x4;
31
32				# spent 11µs within locale::import which was called # once (11µs+0) by DBD::SQLite::dr::BEGIN or DBD::SQLite::dr::connect or DBD::SQLite::dr::__ANON__[/wise/base/static/lib/perl5/site_perl/5.10.0/x86_64-linux-thread-multi/DBD/SQLite.pm:91] at line 91 of /wise/base/static/lib/perl5/site_perl/5.10.0/x86_64-linux-thread-multi/DBD/SQLite.pm sub import {
33	1	4.0e-6	4.0e-6	$^H \|= $locale::hint_bits;
34				}
35
36				# spent 8µs within locale::unimport which was called # once (8µs+0) by DBIx::Class::Schema::load_classes at line 294 of /wise/base/static/lib/perl5/site_perl/5.10.0/DBIx/Class/Schema.pm sub unimport {
37	1	3.0e-6	3.0e-6	$^H &= ~$locale::hint_bits;
38				}
39
40	1	4.0e-6	4.0e-6	1;