← Index
NYTProf Performance Profile   « block view • line view • sub view »
For xt/tapper-mcp-scheduler-with-db-longrun.t
  Run on Tue May 22 17:18:39 2012
Reported on Tue May 22 17:23:07 2012

Filename/2home/ss5/perl5/perlbrew/perls/perl-5.12.3/lib/5.12.3/locale.pm
StatementsExecuted 6 statements in 18µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
2214µs4µslocale::::importlocale::import
1113µs3µslocale::::unimportlocale::unimport
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1package locale;
2
31400nsour $VERSION = '1.00';
4
5=head1 NAME
6
7locale - 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
20This pragma tells the compiler to enable (or disable) the use of POSIX
21locales for built-in operations (LC_CTYPE for regular expressions, and
22LC_COLLATE for string comparison). Each "use locale" or "no locale"
23affects statements to the end of the enclosing BLOCK.
24
25See L<perllocale> for more detailed information on how Perl supports
26locales.
27
28=cut
29
301200ns$locale::hint_bits = 0x4;
31
32
# spent 4µs within locale::import which was called 2 times, avg 2µs/call: # once (3µs+0s) by DBD::SQLite::BEGIN@34 at line 34 of DBD/SQLite.pm # once (2µs+0s) by DBD::SQLite::dr::BEGIN@178 at line 178 of DBD/SQLite.pm
sub import {
33210µs $^H |= $locale::hint_bits;
34}
35
36
# spent 3µs within locale::unimport which was called: # once (3µs+0s) by DBIx::Class::Schema::BEGIN@174 at line 174 of DBIx/Class/Schema.pm
sub unimport {
3716µs $^H &= ~$locale::hint_bits;
38}
39
4013µs1;