← Index
NYTProf Performance Profile   « block view • line view • sub view »
For bin/pan_genome_post_analysis
  Run on Fri Mar 27 11:43:32 2015
Reported on Fri Mar 27 11:45:52 2015

Filename/Users/ap13/perl5/lib/perl5/Graph/Undirected.pm
StatementsExecuted 79 statements in 546µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
3611389µs5.67msGraph::Undirected::::newGraph::Undirected::new
11118µs18µsGraph::Undirected::::BEGIN@3Graph::Undirected::BEGIN@3
11114µs35µsGraph::Undirected::::BEGIN@5Graph::Undirected::BEGIN@5
11113µs119µsGraph::Undirected::::BEGIN@4Graph::Undirected::BEGIN@4
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1package Graph::Undirected;
2
3251µs118µs
# spent 18µs within Graph::Undirected::BEGIN@3 which was called: # once (18µs+0s) by Graph::BEGIN@36 at line 3
use Graph;
# spent 18µs making 1 call to Graph::Undirected::BEGIN@3
4241µs2224µs
# spent 119µs (13+106) within Graph::Undirected::BEGIN@4 which was called: # once (13µs+106µs) by Graph::BEGIN@36 at line 4
use base 'Graph';
# spent 119µs making 1 call to Graph::Undirected::BEGIN@4 # spent 106µs making 1 call to base::import
52118µs257µs
# spent 35µs (14+22) within Graph::Undirected::BEGIN@5 which was called: # once (14µs+22µs) by Graph::BEGIN@36 at line 5
use strict;
# spent 35µs making 1 call to Graph::Undirected::BEGIN@5 # spent 22µs making 1 call to strict::import
6
7=pod
8
9=head1 NAME
10
11Graph::Undirected - undirected graphs
12
13=head1 SYNOPSIS
14
15 use Graph::Undirected;
16 my $g = Graph::Undirected->new;
17
18 # Or alternatively:
19
20 use Graph;
21 my $g = Graph->new(undirected => 1);
22 my $g = Graph->new(directed => 0);
23
24=head1 DESCRIPTION
25
26Graph::Undirected allows you to create undirected graphs.
27
28For the available methods, see L<Graph>.
29
30=head1 SEE ALSO
31
32L<Graph>, L<Graph::Directed>
33
34=head1 AUTHOR AND COPYRIGHT
35
36Jarkko Hietaniemi F<jhi@iki.fi>
37
38=head1 LICENSE
39
40This module is licensed under the same terms as Perl itself.
41
42=cut
43
44
# spent 5.67ms (389µs+5.28) within Graph::Undirected::new which was called 36 times, avg 158µs/call: # 36 times (389µs+5.28ms) by Graph::MST_Prim at line 2394 of Graph.pm, avg 158µs/call
sub new {
4572333µs my $class = shift;
46365.28ms bless Graph->new(undirected => 1, @_), ref $class || $class;
# spent 5.28ms making 36 calls to Graph::new, avg 147µs/call
47}
48
4913µs1;