← Index
NYTProf Performance Profile   « block view • line view • sub view »
For ddd2.pl
  Run on Tue May 25 16:52:24 2010
Reported on Tue May 25 16:56:52 2010

File /home/koumei2/tmp/ddd2.pl
Statements Executed 1393
Statement Execution Time 102ms
Subroutines — ordered by exclusive time
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
11244µs44µsmain::::CORE:prtfmain::CORE:prtf (opcode)
0000s0smain::::BEGINmain::BEGIN
0000s0smain::::RUNTIMEmain::RUNTIME
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
115.74ms#!/usr/local/bin/perl -w
2
3
4326.7ms1143µsuse Wiki::DB::Wiki;
# spent 143µs making 1 call to Exporter::import
5318.8ms1141µsuse WWW::Google::PageRank;
# spent 141µs making 1 call to Exporter::import
6127µs1455µsmy $pr = WWW::Google::PageRank->new;
# spent 455µs making 1 call to WWW::Google::PageRank::new
7180µs1868msfor my $i (Wiki::DB::Wiki->retrieve_all) {
8138326.1ms461220ms my $url = "http://fujisawa.homedns.org/wiki/index.pl?id=" . $i->id;
# spent 220ms making 461 calls to Class::Accessor::__ANON__[Class/Accessor.pm:395], avg 477µs/call
9124.8ms461153s my $rank = scalar($pr->get($url));
# spent 153s making 461 calls to WWW::Google::PageRank::get, avg 331ms/call
10 printf "%s,%s,%s\n", $i->title, $url, $rank if $rank;
# spent 11.3ms making 1 call to Class::Accessor::__ANON__[Class/Accessor.pm:395] # spent 44µs making 1 call to main::CORE:prtf
11}
# spent 44µs within main::CORE:prtf which was called # once (44µs+0s) by main::RUNTIME at line 10 of ddd2.pl
sub main::CORE:prtf; # xsub