| line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
|
1
|
|
|
|
|
|
|
package Template::Magic::HTML ; |
|
2
|
|
|
|
|
|
|
$VERSION = 1.40 ; |
|
3
|
4
|
|
|
4
|
|
28428
|
use strict ; |
|
|
4
|
|
|
|
|
6
|
|
|
|
4
|
|
|
|
|
120
|
|
|
4
|
4
|
|
|
4
|
|
83
|
use 5.006_001 ; |
|
|
4
|
|
|
|
|
13
|
|
|
|
4
|
|
|
|
|
142
|
|
|
5
|
|
|
|
|
|
|
|
|
6
|
|
|
|
|
|
|
# This file uses the "Perlish" coding style |
|
7
|
|
|
|
|
|
|
# please read http://perl.4pro.net/perlish_coding_style.html |
|
8
|
|
|
|
|
|
|
|
|
9
|
4
|
|
|
|
|
2305
|
; use base 'Template::Magic' |
|
10
|
4
|
|
|
4
|
|
21
|
; $Carp::Internal{+__PACKAGE__}++ |
|
|
4
|
|
|
|
|
10
|
|
|
11
|
|
|
|
|
|
|
|
|
12
|
|
|
|
|
|
|
; BEGIN |
|
13
|
4
|
|
|
4
|
|
16
|
{ *NEXT_HANDLER = *Template::Magic::NEXT_HANDLER |
|
14
|
4
|
|
|
|
|
10
|
; *LAST_HANDLER = *Template::Magic::LAST_HANDLER |
|
15
|
4
|
|
|
|
|
9
|
; *EXPORT_OK = *Template::Magic::EXPORT_OK |
|
16
|
4
|
|
|
|
|
17
|
; *DEFAULT_VALUE_HANDLERS = *Template::Magic::HTML_VALUE_HANDLERS |
|
17
|
4
|
|
|
|
|
101
|
; *DEFAULT_MARKERS = *Template::Magic::HTML_MARKERS |
|
18
|
|
|
|
|
|
|
} |
|
19
|
|
|
|
|
|
|
|
|
20
|
|
|
|
|
|
|
; 1 |
|
21
|
|
|
|
|
|
|
|
|
22
|
|
|
|
|
|
|
__END__ |