| Filename | /Users/ether/perl5/perlbrew/perls/36.0/lib/5.36.0/darwin-2level/PerlIO/encoding.pm |
| Statements | Executed 9 statements in 1.37ms |
| Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
|---|---|---|---|---|---|
| 1 | 1 | 1 | 28µs | 32µs | PerlIO::encoding::BEGIN@3 |
| Line | State ments |
Time on line |
Calls | Time in subs |
Code |
|---|---|---|---|---|---|
| 1 | package PerlIO::encoding; | ||||
| 2 | |||||
| 3 | 2 | 130µs | 2 | 36µs | # spent 32µs (28+4) within PerlIO::encoding::BEGIN@3 which was called:
# once (28µs+4µs) by PerlIO::import at line 3 # spent 32µs making 1 call to PerlIO::encoding::BEGIN@3
# spent 4µs making 1 call to strict::import |
| 4 | 1 | 1µs | our $VERSION = '0.30'; | ||
| 5 | 1 | 0s | our $DEBUG = 0; | ||
| 6 | 1 | 0s | $DEBUG and warn __PACKAGE__, " called by ", join(", ", caller), "\n"; | ||
| 7 | |||||
| 8 | # | ||||
| 9 | # Equivalent of this is done in encoding.xs - do not uncomment. | ||||
| 10 | # | ||||
| 11 | # use Encode (); | ||||
| 12 | |||||
| 13 | 1 | 1µs | require XSLoader; | ||
| 14 | 1 | 1.23ms | 1 | 1.22ms | XSLoader::load(); # spent 1.22ms making 1 call to XSLoader::load |
| 15 | |||||
| 16 | 1 | 1µs | our $fallback = Encode::PERLQQ()|Encode::WARN_ON_ERR()|Encode::ONLY_PRAGMA_WARNINGS(); | ||
| 17 | |||||
| 18 | 1 | 7µs | 1; | ||
| 19 | __END__ |