Filename | /home/ss5/perl5/perlbrew/perls/tapper-perl/lib/site_perl/5.16.3/Test/Deep/RegexpVersion.pm |
Statements | Executed 6 statements in 91µs |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
---|---|---|---|---|---|
1 | 1 | 1 | 24µs | 62µs | BEGIN@1.3 | Test::Deep::
1 | 1 | 1 | 12µs | 20µs | BEGIN@2.4 | Test::Deep::
Line | State ments |
Time on line |
Calls | Time in subs |
Code |
---|---|---|---|---|---|
1 | 2 | 33µs | 2 | 99µs | # spent 62µs (24+38) within Test::Deep::BEGIN@1.3 which was called:
# once (24µs+38µs) by Test::Deep::BEGIN@9 at line 1 # spent 62µs making 1 call to Test::Deep::BEGIN@1.3
# spent 38µs making 1 call to strict::import |
2 | 2 | 51µs | 2 | 27µs | # spent 20µs (12+8) within Test::Deep::BEGIN@2.4 which was called:
# once (12µs+8µs) by Test::Deep::BEGIN@9 at line 2 # spent 20µs making 1 call to Test::Deep::BEGIN@2.4
# spent 8µ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 | 4µs | our $OldStyle = ($] < 5.011); | ||
10 | |||||
11 | 1 | 3µs | 1; |