Filename | /home/ss5/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Test/Deep/RegexpVersion.pm |
Statements | Executed 6 statements in 273µs |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
---|---|---|---|---|---|
1 | 1 | 1 | 54µs | 70µs | BEGIN@1.3 | Test::Deep::
1 | 1 | 1 | 28µs | 56µs | BEGIN@2.4 | Test::Deep::
Line | State ments |
Time on line |
Calls | Time in subs |
Code |
---|---|---|---|---|---|
1 | 2 | 93µs | 2 | 86µs | # spent 70µs (54+16) within Test::Deep::BEGIN@1.3 which was called:
# once (54µs+16µs) by Test::Deep::BEGIN@9 at line 1 # spent 70µs making 1 call to Test::Deep::BEGIN@1.3
# spent 16µs making 1 call to strict::import |
2 | 2 | 164µs | 2 | 83µs | # spent 56µs (28+27) within Test::Deep::BEGIN@2.4 which was called:
# once (28µs+27µs) by Test::Deep::BEGIN@9 at line 2 # spent 56µs making 1 call to Test::Deep::BEGIN@2.4
# spent 27µ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 | 6µs | our $OldStyle = ($] < 5.011); | ||
10 | |||||
11 | 1 | 9µs | 1; |