← Index
NYTProf Performance Profile   « line view »
For ./view
  Run on Fri Jul 31 19:05:14 2015
Reported on Fri Jul 31 19:08:09 2015

Filename/usr/lib64/perl5/vendor_perl/List/Util.pm
StatementsExecuted 11 statements in 536µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
11121µs44µsList::Util::::BEGIN@11List::Util::BEGIN@11
0000s0sList::Util::::sum0List::Util::sum0
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1# List::Util.pm
2#
3# Copyright (c) 1997-2009 Graham Barr <gbarr@pobox.com>. All rights reserved.
4# This program is free software; you can redistribute it and/or
5# modify it under the same terms as Perl itself.
6#
7# This module is normally only loaded if the XS module is not available
8
9package List::Util;
10
112198µs268µs
# spent 44µs (21+24) within List::Util::BEGIN@11 which was called: # once (21µs+24µs) by Error::BEGIN@46 at line 11
use strict;
# spent 44µs making 1 call to List::Util::BEGIN@11 # spent 24µs making 1 call to strict::import
121800nsrequire Exporter;
13
14111µsour @ISA = qw(Exporter);
1513µsour @EXPORT_OK = qw(first min max minstr maxstr reduce sum sum0 shuffle);
161400nsour $VERSION = "1.27";
171300nsour $XS_VERSION = $VERSION;
18128µs$VERSION = eval $VERSION;
# spent 4µs executing statements in string eval
19
201600nsrequire XSLoader;
211283µs1271µsXSLoader::load('List::Util', $XS_VERSION);
# spent 271µs making 1 call to XSLoader::load
22
23sub sum0
24{
25 return 0 unless @_;
26 goto &sum;
27}
28
29112µs1;
30
31__END__