blib/lib/Text/Highlight/Perl.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
statement | 4 | 4 | 100.0 |
branch | n/a | ||
condition | n/a | ||
subroutine | 2 | 2 | 100.0 |
pod | 0 | 1 | 0.0 |
total | 6 | 7 | 85.7 |
line | stmt | bran | cond | sub | pod | time | code |
---|---|---|---|---|---|---|---|
1 | package Text::Highlight::Perl; | ||||||
2 | 1 | 1 | 4 | use strict; | |||
1 | 2 | ||||||
1 | 699 | ||||||
3 | |||||||
4 | sub syntax | ||||||
5 | { | ||||||
6 | return { | ||||||
7 | 1 | 1 | 0 | 172 | 'name' => 'Perl', | ||
8 | 'blockCommentOn' => [], | ||||||
9 | 'case' => 1, | ||||||
10 | 'key3' => { | ||||||
11 | 'ne' => 1, | ||||||
12 | 'tr' => 1, | ||||||
13 | 'le' => 1, | ||||||
14 | 'not' => 1, | ||||||
15 | 'x' => 1, | ||||||
16 | 'y' => 1, | ||||||
17 | 'or' => 1, | ||||||
18 | 'eq' => 1, | ||||||
19 | 'qw' => 1, | ||||||
20 | 'qq' => 1, | ||||||
21 | 'm' => 1, | ||||||
22 | 's' => 1, | ||||||
23 | 'cmp' => 1, | ||||||
24 | 'lt' => 1, | ||||||
25 | 'xor' => 1, | ||||||
26 | 'gt' => 1, | ||||||
27 | 'q' => 1, | ||||||
28 | 'qx' => 1, | ||||||
29 | 'and' => 1, | ||||||
30 | 'ge' => 1 | ||||||
31 | }, | ||||||
32 | 'key2' => { | ||||||
33 | 'scalar' => 1, | ||||||
34 | 'sqrt' => 1, | ||||||
35 | 'print' => 1, | ||||||
36 | 'getppid' => 1, | ||||||
37 | 'vec' => 1, | ||||||
38 | 'rename' => 1, | ||||||
39 | 'chop' => 1, | ||||||
40 | 'caller' => 1, | ||||||
41 | 'wantarray' => 1, | ||||||
42 | 'each' => 1, | ||||||
43 | 'undef' => 1, | ||||||
44 | 'stat' => 1, | ||||||
45 | 'open' => 1, | ||||||
46 | 'getpwuid' => 1, | ||||||
47 | 'setpriority' => 1, | ||||||
48 | 'flock' => 1, | ||||||
49 | 'eof' => 1, | ||||||
50 | 'delete' => 1, | ||||||
51 | 'rindex' => 1, | ||||||
52 | 'getpwent' => 1, | ||||||
53 | 'getpeername' => 1, | ||||||
54 | 'quotemeta' => 1, | ||||||
55 | 'tied' => 1, | ||||||
56 | 'setnetent' => 1, | ||||||
57 | 'system' => 1, | ||||||
58 | 'time' => 1, | ||||||
59 | 'shmget' => 1, | ||||||
60 | 'die' => 1, | ||||||
61 | 'getprotobyname' => 1, | ||||||
62 | 'unshift' => 1, | ||||||
63 | 'warn' => 1, | ||||||
64 | 'uc' => 1, | ||||||
65 | 'getprotobynumber' => 1, | ||||||
66 | 'getpriority' => 1, | ||||||
67 | 'ord' => 1, | ||||||
68 | 'truncate' => 1, | ||||||
69 | 'getlogin' => 1, | ||||||
70 | 'sort' => 1, | ||||||
71 | 'length' => 1, | ||||||
72 | 'index' => 1, | ||||||
73 | 'bless' => 1, | ||||||
74 | 'wait' => 1, | ||||||
75 | 'chdir' => 1, | ||||||
76 | 'shmwrite' => 1, | ||||||
77 | 'seekdir' => 1, | ||||||
78 | 'exists' => 1, | ||||||
79 | 'opendir' => 1, | ||||||
80 | 'shmread' => 1, | ||||||
81 | 'exit' => 1, | ||||||
82 | 'substr' => 1, | ||||||
83 | 'no' => 1, | ||||||
84 | 'kill' => 1, | ||||||
85 | 'unlink' => 1, | ||||||
86 | 'readdir' => 1, | ||||||
87 | 'grep' => 1, | ||||||
88 | 'getservent' => 1, | ||||||
89 | 'write' => 1, | ||||||
90 | 'split' => 1, | ||||||
91 | 'exp' => 1, | ||||||
92 | 'ioctl' => 1, | ||||||
93 | 'values' => 1, | ||||||
94 | 'getservbyname' => 1, | ||||||
95 | 'setsockopt' => 1, | ||||||
96 | 'setprotoent' => 1, | ||||||
97 | 'sin' => 1, | ||||||
98 | 'push' => 1, | ||||||
99 | 'shift' => 1, | ||||||
100 | 'pack' => 1, | ||||||
101 | 'hex' => 1, | ||||||
102 | 'endprotoent' => 1, | ||||||
103 | 'setgrent' => 1, | ||||||
104 | 'getpgrp' => 1, | ||||||
105 | 'msgctl' => 1, | ||||||
106 | 'msgrcv' => 1, | ||||||
107 | 'keys' => 1, | ||||||
108 | 'close' => 1, | ||||||
109 | 'gethostbyname' => 1, | ||||||
110 | 'printf' => 1, | ||||||
111 | 'select' => 1, | ||||||
112 | 'formline' => 1, | ||||||
113 | 'accept' => 1, | ||||||
114 | 'gmtime' => 1, | ||||||
115 | 'chmod' => 1, | ||||||
116 | 'import' => 1, | ||||||
117 | 'fork' => 1, | ||||||
118 | 'splice' => 1, | ||||||
119 | 'endpwent' => 1, | ||||||
120 | 'lc' => 1, | ||||||
121 | 'rewinddir' => 1, | ||||||
122 | 'getgrent' => 1, | ||||||
123 | 'atan2' => 1, | ||||||
124 | 'fcntl' => 1, | ||||||
125 | 'sysread' => 1, | ||||||
126 | 'getsockname' => 1, | ||||||
127 | 'closedir' => 1, | ||||||
128 | 'listen' => 1, | ||||||
129 | 'getservbyport' => 1, | ||||||
130 | 'sethostent' => 1, | ||||||
131 | 'study' => 1, | ||||||
132 | 'semctl' => 1, | ||||||
133 | 'lcfirst' => 1, | ||||||
134 | 'localtime' => 1, | ||||||
135 | 'ref' => 1, | ||||||
136 | 'chown' => 1, | ||||||
137 | 'abs' => 1, | ||||||
138 | 'join' => 1, | ||||||
139 | 'tell' => 1, | ||||||
140 | 'sysopen' => 1, | ||||||
141 | 'int' => 1, | ||||||
142 | 'endgrent' => 1, | ||||||
143 | 'untie' => 1, | ||||||
144 | 'unpack' => 1, | ||||||
145 | 'gethostent' => 1, | ||||||
146 | 'setservent' => 1, | ||||||
147 | 'syswrite' => 1, | ||||||
148 | 'getnetent' => 1, | ||||||
149 | 'setpwent' => 1, | ||||||
150 | 'alarm' => 1, | ||||||
151 | 'glob' => 1, | ||||||
152 | 'pos' => 1, | ||||||
153 | 'oct' => 1, | ||||||
154 | 'getnetbyaddr' => 1, | ||||||
155 | 'getsockopt' => 1, | ||||||
156 | 'syscall' => 1, | ||||||
157 | 'chr' => 1, | ||||||
158 | 'tie' => 1, | ||||||
159 | 'shmctl' => 1, | ||||||
160 | 'getnetbyname' => 1, | ||||||
161 | 'semop' => 1, | ||||||
162 | 'binmode' => 1, | ||||||
163 | 'waitpid' => 1, | ||||||
164 | 'gethostbyaddr' => 1, | ||||||
165 | 'mkdir' => 1, | ||||||
166 | 'ucfirst' => 1, | ||||||
167 | 'times' => 1, | ||||||
168 | 'semget' => 1, | ||||||
169 | 'pop' => 1, | ||||||
170 | 'lstat' => 1, | ||||||
171 | 'pipe' => 1, | ||||||
172 | 'getc' => 1, | ||||||
173 | 'sysseek' => 1, | ||||||
174 | 'rmdir' => 1, | ||||||
175 | 'shutdown' => 1, | ||||||
176 | 'read' => 1, | ||||||
177 | 'fileno' => 1, | ||||||
178 | 'new' => 1, | ||||||
179 | 'msgget' => 1, | ||||||
180 | 'prototype' => 1, | ||||||
181 | 'exec' => 1, | ||||||
182 | 'srand' => 1, | ||||||
183 | 'chroot' => 1, | ||||||
184 | 'defined' => 1, | ||||||
185 | 'telldir' => 1, | ||||||
186 | 'bind' => 1, | ||||||
187 | 'readlink' => 1, | ||||||
188 | 'socket' => 1, | ||||||
189 | 'reverse' => 1, | ||||||
190 | 'utime' => 1, | ||||||
191 | 'recv' => 1, | ||||||
192 | 'endhostent' => 1, | ||||||
193 | 'setpgrp' => 1, | ||||||
194 | 'send' => 1, | ||||||
195 | 'dump' => 1, | ||||||
196 | 'socketpair' => 1, | ||||||
197 | 'getpwnam' => 1, | ||||||
198 | 'endnetent' => 1, | ||||||
199 | 'crypt' => 1, | ||||||
200 | 'cos' => 1, | ||||||
201 | 'endservent' => 1, | ||||||
202 | 'symlink' => 1, | ||||||
203 | 'reset' => 1, | ||||||
204 | 'getgrnam' => 1, | ||||||
205 | 'log' => 1, | ||||||
206 | 'sprintf' => 1, | ||||||
207 | 'getgrgid' => 1, | ||||||
208 | 'connect' => 1, | ||||||
209 | 'dbmopen' => 1, | ||||||
210 | 'eval' => 1, | ||||||
211 | 'link' => 1, | ||||||
212 | 'rand' => 1, | ||||||
213 | 'getprotoent' => 1, | ||||||
214 | 'format' => 1, | ||||||
215 | 'chomp' => 1, | ||||||
216 | 'dbmclose' => 1, | ||||||
217 | 'msgsnd' => 1, | ||||||
218 | 'umask' => 1, | ||||||
219 | 'sleep' => 1, | ||||||
220 | 'seek' => 1 | ||||||
221 | }, | ||||||
222 | 'lineComment' => [ | ||||||
223 | '#' | ||||||
224 | ], | ||||||
225 | 'delimiters' => ',(){}[]-+*/=~!&|<>?:;.$@%', | ||||||
226 | 'key1' => { | ||||||
227 | 'require' => 1, | ||||||
228 | 'next' => 1, | ||||||
229 | 'lock' => 1, | ||||||
230 | 'SIG' => 1, | ||||||
231 | 'my' => 1, | ||||||
232 | 'if' => 1, | ||||||
233 | 'redo' => 1, | ||||||
234 | 'map' => 1, | ||||||
235 | '__END__' => 1, | ||||||
236 | 'our' => 1, | ||||||
237 | 'FALSE' => 1, | ||||||
238 | 'ARGV' => 1, | ||||||
239 | 'INC' => 1, | ||||||
240 | 'for' => 1, | ||||||
241 | 'else' => 1, | ||||||
242 | 'ENV' => 1, | ||||||
243 | 'continue' => 1, | ||||||
244 | 'TRUE' => 1, | ||||||
245 | '__LINE__' => 1, | ||||||
246 | 'do' => 1, | ||||||
247 | 'local' => 1, | ||||||
248 | 'foreach' => 1, | ||||||
249 | 'use' => 1, | ||||||
250 | 'ARGVOUT' => 1, | ||||||
251 | 'goto' => 1, | ||||||
252 | 'STDOUT' => 1, | ||||||
253 | 'last' => 1, | ||||||
254 | 'unless' => 1, | ||||||
255 | 'package' => 1, | ||||||
256 | 'elsif' => 1, | ||||||
257 | 'return' => 1, | ||||||
258 | 'until' => 1, | ||||||
259 | 'while' => 1, | ||||||
260 | 'STDERR' => 1, | ||||||
261 | 'sub' => 1, | ||||||
262 | 'STDIN' => 1, | ||||||
263 | '__DATA__' => 1, | ||||||
264 | '__PACKAGE__' => 1, | ||||||
265 | '__FILE__' => 1 | ||||||
266 | }, | ||||||
267 | 'quot' => [ | ||||||
268 | '\'', | ||||||
269 | '"' | ||||||
270 | ], | ||||||
271 | 'escape' => '\\', | ||||||
272 | 'continueQuote' => 1 | ||||||
273 | }; | ||||||
274 | |||||||
275 | } | ||||||
276 | |||||||
277 | 1; | ||||||
278 | __END__ |