Filename | /2home/ss5/perl5/perlbrew/perls/perl-5.12.3/lib/site_perl/5.12.3/Test/Deep/RegexpVersion.pm |
Statements | Executed 8 statements in 52µs |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
---|---|---|---|---|---|
1 | 1 | 1 | 13µs | 15µs | BEGIN@1.36 | Test::Deep::
1 | 1 | 1 | 7µs | 16µs | BEGIN@2.37 | Test::Deep::
Line | State ments |
Time on line |
Calls | Time in subs |
Code |
---|---|---|---|---|---|
1 | 3 | 17µs | 2 | 18µs | # spent 15µs (13+2) within Test::Deep::BEGIN@1.36 which was called:
# once (13µs+2µs) by Test::Deep::BEGIN@9 at line 1 # spent 15µs making 1 call to Test::Deep::BEGIN@1.36
# spent 2µs making 1 call to strict::import |
2 | 3 | 30µs | 2 | 24µs | # spent 16µs (7+9) within Test::Deep::BEGIN@2.37 which was called:
# once (7µs+9µs) by Test::Deep::BEGIN@9 at line 2 # spent 16µs making 1 call to Test::Deep::BEGIN@2.37
# spent 9µs making 1 call to warnings::import |
3 | |||||
4 | package Test::Deep::RegexpVersion; | ||||
5 | |||||
6 | # Older versions of Perl treated Regexp refs as opaque scalars blessed | ||||
7 | # into the "Regexp" class. Several bits of code need this so we | ||||
8 | # centralise the test for that kind of version. | ||||
9 | 1 | 2µs | our $OldStyle = ($] < 5.011); | ||
10 | |||||
11 | 1 | 2µs | 1; |