← Index
NYTProf Performance Profile   « block view • line view • sub view »
For bin/hailo
  Run on Thu Oct 21 22:50:37 2010
Reported on Thu Oct 21 22:52:11 2010

Filename/home/hinrik/perl5/perlbrew/perls/perl-5.13.5/lib/site_perl/5.13.5/Regexp/Common/URI/tv.pm
StatementsExecuted 18 statements in 223µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
11126µs108µsRegexp::Common::URI::tv::::BEGIN@6Regexp::Common::URI::tv::BEGIN@6
11118µs23µsRegexp::Common::URI::tv::::BEGIN@10Regexp::Common::URI::tv::BEGIN@10
11111µs21µsRegexp::Common::URI::tv::::BEGIN@11Regexp::Common::URI::tv::BEGIN@11
11111µs47µsRegexp::Common::URI::tv::::BEGIN@13Regexp::Common::URI::tv::BEGIN@13
11111µs53µsRegexp::Common::URI::tv::::BEGIN@7Regexp::Common::URI::tv::BEGIN@7
11111µs122µsRegexp::Common::URI::tv::::BEGIN@8Regexp::Common::URI::tv::BEGIN@8
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1# TV URLs.
2# Internet draft: draft-zigmond-tv-url-03.txt
3
4package Regexp::Common::URI::tv;
5
6234µs2108µs
# spent 108µs (26+82) within Regexp::Common::URI::tv::BEGIN@6 which was called: # once (26µs+82µs) by Regexp::Common::import at line 6
use Regexp::Common qw /pattern clean no_defaults/;
# spent 108µs making 1 call to Regexp::Common::URI::tv::BEGIN@6 # spent 82µs making 1 call to Regexp::Common::import, recursion: max depth 1, sum of overlapping time 82µs
7228µs295µs
# spent 53µs (11+42) within Regexp::Common::URI::tv::BEGIN@7 which was called: # once (11µs+42µs) by Regexp::Common::import at line 7
use Regexp::Common::URI qw /register_uri/;
# spent 53µs making 1 call to Regexp::Common::URI::tv::BEGIN@7 # spent 42µs making 1 call to Exporter::import
8230µs2233µs
# spent 122µs (11+111) within Regexp::Common::URI::tv::BEGIN@8 which was called: # once (11µs+111µs) by Regexp::Common::import at line 8
use Regexp::Common::URI::RFC2396 qw /$hostname/;
# spent 122µs making 1 call to Regexp::Common::URI::tv::BEGIN@8 # spent 111µs making 1 call to Exporter::import
9
10226µs228µs
# spent 23µs (18+5) within Regexp::Common::URI::tv::BEGIN@10 which was called: # once (18µs+5µs) by Regexp::Common::import at line 10
use strict;
# spent 23µs making 1 call to Regexp::Common::URI::tv::BEGIN@10 # spent 5µs making 1 call to strict::import
11227µs230µs
# spent 21µs (11+9) within Regexp::Common::URI::tv::BEGIN@11 which was called: # once (11µs+9µs) by Regexp::Common::import at line 11
use warnings;
# spent 21µs making 1 call to Regexp::Common::URI::tv::BEGIN@11 # spent 9µs making 1 call to warnings::import
12
13257µs282µs
# spent 47µs (11+36) within Regexp::Common::URI::tv::BEGIN@13 which was called: # once (11µs+36µs) by Regexp::Common::import at line 13
use vars qw /$VERSION/;
# spent 47µs making 1 call to Regexp::Common::URI::tv::BEGIN@13 # spent 35µs making 1 call to vars::import
1412µs$VERSION = '2010010201';
15
16
1712µsmy $tv_scheme = 'tv';
1812µsmy $tv_url = "(?k:(?k:$tv_scheme):(?k:$hostname)?)";
19
2014µs15µsregister_uri $tv_scheme => $tv_url;
# spent 5µs making 1 call to Regexp::Common::URI::register_uri
21
2215µs1106µspattern name => [qw (URI tv)],
# spent 106µs making 1 call to Regexp::Common::pattern
23 create => $tv_url,
24 ;
25
2616µs1;
27
28__END__