|
<?xml version="1.0"?>
<!DOCTYPE MODE SYSTEM "xmode.dtd">
<MODE>
<PROPS>
<PROPERTY NAME="lineComment" VALUE="#" />
<PROPERTY NAME="indentOpenBrackets" VALUE="{" />
<PROPERTY NAME="indentCloseBrackets" VALUE="}" />
<PROPERTY NAME="unalignedOpenBrackets" VALUE="(" />
<PROPERTY NAME="unalignedCloseBrackets" VALUE=")" />
<PROPERTY NAME="indentNextLine" VALUE="[^#]*\.\s*$" />
</PROPS>
<!-- no ESCAPE char because we need the backslash for references -->
<RULES HIGHLIGHT_DIGITS="TRUE" IGNORE_CASE="FALSE">
<!-- Comments -->
<EOL_SPAN TYPE="COMMENT1">#</EOL_SPAN>
<!-- TYPE is LABEL so that =head1 and =cut are highlighted as so -->
<SPAN TYPE="LABEL" DELEGATE="POD" AT_LINE_START="TRUE">
<BEGIN>=head1</BEGIN>
<END>=cut</END>
</SPAN>
<SPAN AT_LINE_START="TRUE" TYPE="LABEL" DELEGATE="POD">
<BEGIN>=head2</BEGIN>
<END>=cut</END>
</SPAN>
<SPAN TYPE="LABEL" DELEGATE="POD" AT_LINE_START="TRUE">
<BEGIN>=head3</BEGIN>
<END>=cut</END>
</SPAN>
<SPAN AT_LINE_START="TRUE" TYPE="LABEL" DELEGATE="POD">
<BEGIN>=head4</BEGIN>
<END>=cut</END>
</SPAN>
<SPAN TYPE="LABEL" AT_LINE_START="TRUE" DELEGATE="POD">
<BEGIN>=item</BEGIN>
<END>=cut</END>
</SPAN>
<SPAN AT_LINE_START="TRUE" TYPE="LABEL" DELEGATE="POD">
<BEGIN>=over</BEGIN>
<END>=cut</END>
</SPAN>
<SPAN TYPE="LABEL" DELEGATE="POD" AT_LINE_START="TRUE">
<BEGIN>=back</BEGIN>
<END>=cut</END>
</SPAN>
<SPAN AT_LINE_START="TRUE" TYPE="LABEL" DELEGATE="POD">
<BEGIN>=pod</BEGIN>
<END>=cut</END>
</SPAN>
<SPAN TYPE="LABEL" DELEGATE="POD" AT_LINE_START="TRUE">
<BEGIN>=for</BEGIN>
<END>=cut</END>
</SPAN>
<SPAN TYPE="LABEL" DELEGATE="POD" AT_LINE_START="TRUE">
<BEGIN>=begin</BEGIN>
<END>=cut</END>
</SPAN>
<SPAN AT_LINE_START="TRUE" TYPE="LABEL" DELEGATE="POD">
<BEGIN>=end</BEGIN>
<END>=cut</END>
</SPAN>
<!-- Some other things that confuse the mode file. -->
<SEQ TYPE="OPERATOR">*"
<SEQ TYPE="OPERATOR">*'
<SEQ TYPE="OPERATOR">&"
<SEQ TYPE="OPERATOR">&'
<SPAN TYPE="KEYWORD2" NO_LINE_BREAK="TRUE" DELEGATE="VARIABLE">
<BEGIN>${</BEGIN>
<END>}</END>
</SPAN>
<!-- Scalar variables -->
<SEQ_REGEXP HASH_CHAR="$" TYPE="KEYWORD2">\$#?((\p{Alpha}\w*|_\w+)?::)*(\p{Alpha}\w*|_\w+|\d+)</SEQ_REGEXP>
<!-- Array variables -->
<SEQ_REGEXP HASH_CHAR="@" TYPE="KEYWORD2">@((\p{Alpha}\w*|_\w+)?::)*(\p{Alpha}\w*|_\w+|\d+)</SEQ_REGEXP>
<!-- Associative Array (= Hash) variables -->
<SEQ_REGEXP HASH_CHAR="%" TYPE="KEYWORD2">%((\p{Alpha}\w*|_\w+)?::)*(\p{Alpha}\w*|_\w+|\d+)</SEQ_REGEXP>
<!-- Dereferences -->
<SEQ_REGEXP HASH_CHAR="$$" TYPE="KEYWORD4">\$\$+((\p{Alpha}\w*|_\w+)?::)*(\p{Alpha}\w*|_\w+|\d+)</SEQ_REGEXP>
<SEQ_REGEXP HASH_CHAR="@$" TYPE="KEYWORD4">@\$((\p{Alpha}\w*|_\w+)?::)*(\p{Alpha}\w*|_\w+|\d+)</SEQ_REGEXP>
<SEQ_REGEXP HASH_CHAR="%$" TYPE="KEYWORD4">%\$((\p{Alpha}\w*|_\w+)?::)*(\p{Alpha}\w*|_\w+|\d+)</SEQ_REGEXP>
<SEQ_REGEXP HASH_CHAR="*" TYPE="KEYWORD4">\*((\p{Alpha}\w*|_\w+)?::)*(\p{Alpha}\w*|_\w+|\d+)</SEQ_REGEXP>
<!-- Perl predefined variables -->
<SEQ_REGEXP HASH_CHAR="$^" TYPE="KEYWORD2">\$\^\p{Alpha}</SEQ_REGEXP>
<SEQ_REGEXP HASH_CHAR="$" TYPE="KEYWORD2">\$\p{Punct}</SEQ_REGEXP>
<!-- references to vars and code, starting with a backslash -->
<SEQ_REGEXP HASH_CHAR="\" TYPE="KEYWORD4">\\[@%\$&]((\p{Alpha}\w*|_\w+)?::)*(\p{Alpha}\w*|_\w+|\d+)</SEQ_REGEXP>
<!-- complex code dereference -->
<SPAN TYPE="KEYWORD4" NO_LINE_BREAK="TRUE" DELEGATE="MAIN">
<BEGIN>&{</BEGIN>
<END>}</END>
</SPAN>
<!-- Function calls from variables -->
<SEQ_REGEXP HASH_CHAR="&$" TYPE="FUNCTION">&\$((\p{Alpha}\w*|_\w+)?::)*(\p{Alpha}\w*|_\w+|\d+)</SEQ_REGEXP>
<!-- Highlight calls to subs that contain ' in the name. -->
<SEQ_REGEXP HASH_CHAR="&" TYPE="FUNCTION"
>&\p{Alpha}[\p{Alnum}_]*'\p{Alpha}[\p{Alnum}_]*
<!-- Literals -->
<SPAN TYPE="LITERAL1" DELEGATE="LITERAL">
<BEGIN>"
<END>"
</SPAN>
<!-- apostrophe literals -->
<SPAN TYPE="LITERAL1" DELEGATE="APOSTR">
<BEGIN>'
<END>'
</SPAN>
<SEQ_REGEXP TYPE="LITERAL1">\b\w+\b(?=\s*=>)</SEQ_REGEXP>
<!-- options: -text -->
<SEQ_REGEXP HASH_CHAR="-" TYPE="LITERAL1">-[\p{Lower}]\w+</SEQ_REGEXP>
<!-- file stat expressions -->
<SEQ_REGEXP HASH_CHAR="-" TYPE="KEYWORD3">-[\p{Lower}]</SEQ_REGEXP>
<!-- non-quoted literals in hashes -->
<SPAN_REGEXP TYPE="OPERATOR" HASH_CHAR="{" NO_LINE_BREAK="TRUE" DELEGATE="LITERAL">
<BEGIN>\{(?=\s*[\p{Alpha}_\-][\p{Alnum}_]*\s*\})</BEGIN>
<END>}</END>
</SPAN_REGEXP>
<!-- Code blocks. This is a hack to correctly highlight some
complex expressions that can have arbitrary perl code
inside brackets (like array deferences below). Declaring
this *before* the other rules is needed to maintain
correct bracket matching.
-->
<SPAN TYPE="OPERATOR" NO_LINE_BREAK="FALSE" DELEGATE="MAIN">
<BEGIN>{</BEGIN>
<END>}</END>
</SPAN>
<!-- Array dereference -->
<SPAN TYPE="KEYWORD4" NO_LINE_BREAK="TRUE" DELEGATE="MAIN">
<BEGIN>@{</BEGIN>
<END>}</END>
</SPAN>
<!-- Hash dereference -->
<SPAN TYPE="KEYWORD4" NO_LINE_BREAK="TRUE" DELEGATE="MAIN">
<BEGIN>%{</BEGIN>
<END>}</END>
</SPAN>
<!-- labels, catches also package prefixes at line start :( -->
<MARK_PREVIOUS TYPE="LABEL" AT_LINE_START="TRUE" MATCH_TYPE="OPERATOR">:</MARK_PREVIOUS>
<!-- __DATA__ and similar -->
<SEQ_REGEXP HASH_CHAR="__" TYPE="KEYWORD4">__\w+__</SEQ_REGEXP>
<!-- Exec -->
<SPAN TYPE="KEYWORD3" DELEGATE="EXEC">
<BEGIN>`</BEGIN>
<END>`</END>
</SPAN>
<!-- file globs / IO operators -->
<SEQ_REGEXP HASH_CHAR="<" TYPE="KEYWORD4"><[\p{Punct}\p{Alnum}_]*></SEQ_REGEXP>
<!-- Heredoc -->
<SPAN_REGEXP HASH_CHAR="<<" TYPE="LITERAL2" DELEGATE="LITERAL">
<BEGIN><![CDATA[<<\p{Space}*(['"])([\p{Space}\p{Alnum}_]*)\1;?\s*]]>
<END AT_LINE_START="TRUE">$2</END>
</SPAN_REGEXP>
<SPAN_REGEXP HASH_CHAR="<<" TYPE="LITERAL2" DELEGATE="LITERAL">
<BEGIN><![CDATA[<<([\p{Alpha}_][\p{Alnum}_]*);?\s*]]></BEGIN>
<END AT_LINE_START="TRUE">$1</END>
</SPAN_REGEXP>
<!-- jEdit 4.1 adds regular expression syntax rules so we can
highlight this sort of crap. -->
<!-- /Regexp/, avoid confusion with a sequence of two divisions! -->
<SEQ_REGEXP TYPE="MARKUP" HASH_CHAR="/"
AT_WORD_START="TRUE">/.*?[^\\]/([cgimosx]+\b|(?=[^cgimosx])|$)(?!\s*[\d\$\@\(\{\-A-Z"'])
<!-- q//, qq//, qx// -->
<SPAN_REGEXP HASH_CHAR="q"
TYPE="LITERAL1"
ESCAPE="\"
MATCH_TYPE="OPERATOR"
AT_WORD_START="TRUE"
NO_LINE_BREAK="FALSE">
<BEGIN>q[qxw]?([#/\|!])</BEGIN>
<END>~1</END>
</SPAN_REGEXP>
<SPAN_REGEXP HASH_CHAR="q"
MATCH_TYPE="OPERATOR"
DELEGATE="QUOTED_BRACKET"
AT_WORD_START="TRUE"
NO_LINE_BREAK="FALSE">
<BEGIN>q[qxw]?(\[)</BEGIN>
<END>~1</END>
</SPAN_REGEXP>
<SPAN_REGEXP HASH_CHAR="q"
MATCH_TYPE="OPERATOR"
DELEGATE="QUOTED_BRACE"
AT_WORD_START="TRUE"
NO_LINE_BREAK="FALSE">
<BEGIN>q[qxw]?(\{)</BEGIN>
<END>~1</END>
</SPAN_REGEXP>
<SPAN_REGEXP HASH_CHAR="q"
MATCH_TYPE="OPERATOR"
DELEGATE="QUOTED_PAREN"
AT_WORD_START="TRUE"
NO_LINE_BREAK="FALSE">
<BEGIN>q[qxw]?(\()</BEGIN>
<END>~1</END>
</SPAN_REGEXP>
<!-- qr// should match other regex highlight colors -->
<SPAN_REGEXP HASH_CHAR="q"
ESCAPE="\"
TYPE="LITERAL1"
MATCH_TYPE="OPERATOR"
AT_WORD_START="TRUE"
NO_LINE_BREAK="FALSE">
<BEGIN>qr([#/\|!])</BEGIN>
<END>~1</END>
</SPAN_REGEXP>
<SPAN_REGEXP HASH_CHAR="q"
DELEGATE="QUOTED_BRACKET"
MATCH_TYPE="OPERATOR"
AT_WORD_START="TRUE"
NO_LINE_BREAK="FALSE">
<BEGIN>qr(\[)</BEGIN>
<END>~1</END>
</SPAN_REGEXP>
<SPAN_REGEXP HASH_CHAR="q"
DELEGATE="QUOTED_BRACE"
MATCH_TYPE="OPERATOR"
AT_WORD_START="TRUE"
NO_LINE_BREAK="FALSE">
<BEGIN>qr(\{)</BEGIN>
<END>~1</END>
</SPAN_REGEXP>
<SPAN_REGEXP HASH_CHAR="q"
DELEGATE="QUOTED_PAREN"
ESCAPE="\"
MATCH_TYPE="OPERATOR"
AT_WORD_START="TRUE"
NO_LINE_BREAK="FALSE">
<BEGIN>qr(\()</BEGIN>
<END>~1</END>
</SPAN_REGEXP>
<!-- tr/// transliteration -->
<SEQ_REGEXP TYPE="MARKUP" HASH_CHAR="tr"
AT_WORD_START="TRUE">tr\s*\{.*?[^\\]\}\s*\{(?:.*?[^\\])*?\}[cds]*</SEQ_REGEXP>
<SEQ_REGEXP TYPE="MARKUP" HASH_CHAR="tr"
AT_WORD_START="TRUE">tr([^\p{Alnum}\p{Space}\}])(?:.*?)\1(?:.*?)\1[cds]*</SEQ_REGEXP>
<!-- y/// translation -->
<SEQ_REGEXP TYPE="MARKUP" HASH_CHAR="y"
AT_WORD_START="TRUE">y\s*\{.*?[^\\]\}\s*\{(?:.*?[^\\])*?\}[cds]*</SEQ_REGEXP>
<SEQ_REGEXP TYPE="MARKUP" HASH_CHAR="y"
AT_WORD_START="TRUE">y([^\p{Alnum}\p{Space}\}_])(?:.*?)\1(?:.*?)\1[cds]*</SEQ_REGEXP>
<!-- m// regular expression matching -->
<SEQ_REGEXP TYPE="MARKUP" HASH_CHAR="m"
AT_WORD_START="TRUE">m\s*\{.*?[^\\]\}[cgimosx]*</SEQ_REGEXP>
<SEQ_REGEXP TYPE="MARKUP" HASH_CHAR="m"
AT_WORD_START="TRUE">m([^\p{Alnum}\p{Space}\}])(?:.*?[^\\])\1[cgimosx]*</SEQ_REGEXP>
<!-- s/// regular expression substitution -->
<SEQ_REGEXP TYPE="MARKUP" HASH_CHAR="s"
AT_WORD_START="TRUE">s\s*\{.*?\}\s*\{.*?\}[egimosx]*</SEQ_REGEXP>
<SEQ_REGEXP TYPE="MARKUP" HASH_CHAR="s"
AT_WORD_START="TRUE">s([^\p{Alnum}\p{Space}\}])(?:.*?)\1(?:.*?)\1[egimosx]*</SEQ_REGEXP>
<!-- complex operators -->
<SEQ TYPE="OPERATOR">||</SEQ>
<SEQ TYPE="OPERATOR">//</SEQ>
<SEQ TYPE="OPERATOR">&&</SEQ>
<SEQ TYPE="OPERATOR">!=</SEQ>
<SEQ TYPE="OPERATOR"><=></SEQ>
<SEQ TYPE="OPERATOR">-></SEQ>
<SEQ TYPE="OPERATOR">=></SEQ>
<SEQ TYPE="OPERATOR">==</SEQ>
<SEQ TYPE="OPERATOR">=~</SEQ>
<SEQ TYPE="OPERATOR">!~</SEQ>
<SEQ TYPE="OPERATOR">~~</SEQ>
<SEQ TYPE="OPERATOR">+=</SEQ>
<SEQ TYPE="OPERATOR">-=</SEQ>
<SEQ TYPE="OPERATOR">/=</SEQ>
<SEQ TYPE="OPERATOR">*=</SEQ>
<SEQ TYPE="OPERATOR">.=</SEQ>
<SEQ TYPE="OPERATOR">%=</SEQ>
<SEQ TYPE="OPERATOR">&=</SEQ>
<SEQ TYPE="OPERATOR">|=</SEQ>
<SEQ TYPE="OPERATOR">**=</SEQ>
<SEQ TYPE="OPERATOR"><<=</SEQ>
<SEQ TYPE="OPERATOR">>>=</SEQ>
<SEQ TYPE="OPERATOR">&&=</SEQ>
<SEQ TYPE="OPERATOR">||=</SEQ>
<SEQ TYPE="OPERATOR">^=</SEQ>
<SEQ TYPE="OPERATOR">x=</SEQ>
<SEQ TYPE="OPERATOR">>=</SEQ>
<SEQ TYPE="OPERATOR"><=</SEQ>
<SEQ TYPE="OPERATOR">></SEQ>
<SEQ TYPE="OPERATOR"><</SEQ>
<!-- simple operators -->
<SEQ TYPE="OPERATOR">|</SEQ>
<SEQ TYPE="OPERATOR">&</SEQ>
<SEQ TYPE="OPERATOR">!</SEQ>
<SEQ TYPE="OPERATOR">=</SEQ>
<SEQ TYPE="OPERATOR">!</SEQ>
<SEQ TYPE="OPERATOR">+</SEQ>
<SEQ TYPE="OPERATOR">-</SEQ>
<SEQ TYPE="OPERATOR">/</SEQ>
<SEQ TYPE="OPERATOR">**</SEQ>
<SEQ TYPE="OPERATOR">*</SEQ>
<SEQ TYPE="OPERATOR">^</SEQ>
<SEQ TYPE="OPERATOR">~</SEQ>
<SEQ TYPE="OPERATOR">{</SEQ>
<SEQ TYPE="OPERATOR">}</SEQ>
<SEQ TYPE="OPERATOR">?</SEQ>
<SEQ TYPE="OPERATOR">:</SEQ>
<!-- Keywords -->
<KEYWORDS>
<KEYWORD1>new</KEYWORD1>
<KEYWORD1>if</KEYWORD1>
<KEYWORD1>until</KEYWORD1>
<KEYWORD1>while</KEYWORD1>
<KEYWORD1>elsif</KEYWORD1>
<KEYWORD1>else</KEYWORD1>
<KEYWORD1>unless</KEYWORD1>
<KEYWORD1>for</KEYWORD1>
<KEYWORD1>foreach</KEYWORD1>
<KEYWORD1>BEGIN</KEYWORD1>
<KEYWORD1>END</KEYWORD1>
<OPERATOR>cmp</OPERATOR>
<OPERATOR>eq</OPERATOR>
<OPERATOR>ne</OPERATOR>
<OPERATOR>le</OPERATOR>
<OPERATOR>ge</OPERATOR>
<OPERATOR>not</OPERATOR>
<OPERATOR>and</OPERATOR>
<OPERATOR>or</OPERATOR>
<OPERATOR>xor</OPERATOR>
<!-- At least attempt to highlight 'x', although this misses some -->
<OPERATOR>x</OPERATOR>
<!--
The following function list was derived from the perlfunc man
page, Perl version 5.00503
Certain keywords have been commented out where they appear more
than once, and the y///, qx//, etc. functions have been removed,
since they would are colorized not as keywords, but with separate
rules.
-->
<!-- Functions for SCALARs or strings -->
<KEYWORD3>chomp</KEYWORD3>
<KEYWORD3>chop</KEYWORD3>
<KEYWORD3>chr</KEYWORD3>
<KEYWORD3>crypt</KEYWORD3>
<KEYWORD3>hex</KEYWORD3>
<KEYWORD3>index</KEYWORD3>
<KEYWORD3>lc</KEYWORD3>
<KEYWORD3>lcfirst</KEYWORD3>
<KEYWORD3>length</KEYWORD3>
<KEYWORD3>oct</KEYWORD3>
<KEYWORD3>ord</KEYWORD3>
<KEYWORD3>pack</KEYWORD3>
<KEYWORD3>reverse</KEYWORD3>
<KEYWORD3>rindex</KEYWORD3>
<KEYWORD3>sprintf</KEYWORD3>
<KEYWORD3>substr</KEYWORD3>
<KEYWORD3>uc</KEYWORD3>
<KEYWORD3>ucfirst</KEYWORD3>
<!-- Regular expressions and pattern matching -->
<KEYWORD3>pos</KEYWORD3>
<KEYWORD3>quotemeta</KEYWORD3>
<KEYWORD3>split</KEYWORD3>
<KEYWORD3>study</KEYWORD3>
<!-- Numeric functions -->
<KEYWORD3>abs</KEYWORD3>
<KEYWORD3>atan2</KEYWORD3>
<KEYWORD3>cos</KEYWORD3>
<KEYWORD3>exp</KEYWORD3>
<!--<KEYWORD3>hex</KEYWORD3>-->
<KEYWORD3>int</KEYWORD3>
<KEYWORD3>log</KEYWORD3>
<!--<KEYWORD3>oct</KEYWORD3>-->
<KEYWORD3>rand</KEYWORD3>
<KEYWORD3>sin</KEYWORD3>
<KEYWORD3>sqrt</KEYWORD3>
<KEYWORD3>srand</KEYWORD3>
<!-- Functions for real @ARRAYs -->
<KEYWORD3>pop</KEYWORD3>
<KEYWORD3>push</KEYWORD3>
<KEYWORD3>shift</KEYWORD3>
<KEYWORD3>splice</KEYWORD3>
<KEYWORD3>unshift</KEYWORD3>
<!-- Functions for list data -->
<KEYWORD3>grep</KEYWORD3>
<KEYWORD3>join</KEYWORD3>
<KEYWORD3>map</KEYWORD3>
<!--<KEYWORD3>reverse</KEYWORD3>-->
<KEYWORD3>sort</KEYWORD3>
<KEYWORD3>unpack</KEYWORD3>
<!-- Functions for real %HASHes -->
<KEYWORD3>delete</KEYWORD3>
<KEYWORD3>each</KEYWORD3>
<KEYWORD3>exists</KEYWORD3>
<KEYWORD3>keys</KEYWORD3>
<KEYWORD3>values</KEYWORD3>
<!-- Input and output functions -->
<KEYWORD3>binmode</KEYWORD3>
<KEYWORD3>close</KEYWORD3>
<KEYWORD3>closedir</KEYWORD3>
<KEYWORD3>dbmclose</KEYWORD3>
<KEYWORD3>dbmopen</KEYWORD3>
<!--<KEYWORD3>die</KEYWORD3>-->
<KEYWORD3>eof</KEYWORD3>
<KEYWORD3>fileno</KEYWORD3>
<KEYWORD3>flock</KEYWORD3>
<KEYWORD3>format</KEYWORD3>
<KEYWORD3>getc</KEYWORD3>
<KEYWORD3>print</KEYWORD3>
<KEYWORD3>printf</KEYWORD3>
<KEYWORD3>read</KEYWORD3>
<KEYWORD3>readdir</KEYWORD3>
<KEYWORD3>rewinddir</KEYWORD3>
<KEYWORD3>say</KEYWORD3>
<KEYWORD3>seek</KEYWORD3>
<KEYWORD3>seekdir</KEYWORD3>
<KEYWORD3>select</KEYWORD3>
<KEYWORD3>syscall</KEYWORD3>
<KEYWORD3>sysread</KEYWORD3>
<KEYWORD3>sysseek</KEYWORD3>
<KEYWORD3>syswrite</KEYWORD3>
<KEYWORD3>tell</KEYWORD3>
<KEYWORD3>telldir</KEYWORD3>
<KEYWORD3>truncate</KEYWORD3>
<KEYWORD3>warn</KEYWORD3>
<KEYWORD3>write</KEYWORD3>
<!-- Functions for fixed length data or records -->
<!--<KEYWORD3>pack</KEYWORD3>-->
<!--<KEYWORD3>read</KEYWORD3>-->
<!--<KEYWORD3>syscall</KEYWORD3>-->
<!--<KEYWORD3>sysread</KEYWORD3>-->
<!--<KEYWORD3>syswrite</KEYWORD3>-->
<!--<KEYWORD3>unpack</KEYWORD3>-->
<KEYWORD3>vec</KEYWORD3>
<!-- Functions for filehandles, files, or directories -->
<KEYWORD3>chdir</KEYWORD3>
<KEYWORD3>chmod</KEYWORD3>
<KEYWORD3>chown</KEYWORD3>
<KEYWORD3>chroot</KEYWORD3>
<KEYWORD3>fcntl</KEYWORD3>
<KEYWORD3>glob</KEYWORD3>
<KEYWORD3>ioctl</KEYWORD3>
<KEYWORD3>link</KEYWORD3>
<KEYWORD3>lstat</KEYWORD3>
<KEYWORD3>mkdir</KEYWORD3>
<KEYWORD3>open</KEYWORD3>
<KEYWORD3>opendir</KEYWORD3>
<KEYWORD3>readlink</KEYWORD3>
<KEYWORD3>rename</KEYWORD3>
<KEYWORD3>rmdir</KEYWORD3>
<KEYWORD3>stat</KEYWORD3>
<KEYWORD3>symlink</KEYWORD3>
<KEYWORD3>umask</KEYWORD3>
<KEYWORD3>unlink</KEYWORD3>
<KEYWORD3>utime</KEYWORD3>
<!-- Keywords related to the control flow of your perl program -->
<KEYWORD1>caller</KEYWORD1>
<KEYWORD1>case</KEYWORD1>
<KEYWORD1>continue</KEYWORD1>
<KEYWORD1>croak</KEYWORD1>
<KEYWORD1>die</KEYWORD1>
<KEYWORD1>do</KEYWORD1>
<KEYWORD1>dump</KEYWORD1>
<KEYWORD1>eval</KEYWORD1>
<KEYWORD1>exit</KEYWORD1>
<KEYWORD1>goto</KEYWORD1>
<KEYWORD1>last</KEYWORD1>
<KEYWORD1>next</KEYWORD1>
<KEYWORD1>redo</KEYWORD1>
<KEYWORD1>return</KEYWORD1>
<KEYWORD1>switch</KEYWORD1>
<KEYWORD1>wantarray</KEYWORD1>
<!-- Keywords related to switch -->
<KEYWORD1>break</KEYWORD1>
<KEYWORD1>default</KEYWORD1>
<KEYWORD1>given</KEYWORD1>
<KEYWORD1>when</KEYWORD1>
<!-- Keywords related to scoping -->
<!--<KEYWORD1>caller</KEYWORD1>-->
<!--<KEYWORD1>import</KEYWORD1>-->
<KEYWORD1>local</KEYWORD1>
<KEYWORD1>my</KEYWORD1>
<KEYWORD1>our</KEYWORD1>
<KEYWORD1>package</KEYWORD1>
<KEYWORD1>state</KEYWORD1>
<KEYWORD1>use</KEYWORD1>
<!-- Miscellaneous functions -->
<KEYWORD3>defined</KEYWORD3>
<!--<KEYWORD3>dump</KEYWORD3>-->
<!--<KEYWORD3>eval</KEYWORD3>-->
<KEYWORD3>formline</KEYWORD3>
<!--<KEYWORD3>local</KEYWORD3>-->
<!--<KEYWORD3>my</KEYWORD3>-->
<KEYWORD3>reset</KEYWORD3>
<KEYWORD3>scalar</KEYWORD3>
<KEYWORD3>undef</KEYWORD3>
<!--<KEYWORD3>wantarray</KEYWORD3>-->
<!-- Functions for processes and process groups -->
<KEYWORD3>alarm</KEYWORD3>
<KEYWORD3>exec</KEYWORD3>
<KEYWORD3>fork</KEYWORD3>
<KEYWORD3>getpgrp</KEYWORD3>
<KEYWORD3>getppid</KEYWORD3>
<KEYWORD3>getpriority</KEYWORD3>
<KEYWORD3>kill</KEYWORD3>
<KEYWORD3>pipe</KEYWORD3>
<KEYWORD3>setpgrp</KEYWORD3>
<KEYWORD3>setpriority</KEYWORD3>
<KEYWORD3>sleep</KEYWORD3>
<KEYWORD3>system</KEYWORD3>
<KEYWORD3>times</KEYWORD3>
<KEYWORD3>wait</KEYWORD3>
<KEYWORD3>waitpid</KEYWORD3>
<!-- Keywords related to perl modules -->
<!--<KEYWORD1>do</KEYWORD1>-->
<KEYWORD1>import</KEYWORD1>
<KEYWORD1>no</KEYWORD1>
<!--<KEYWORD1>package</KEYWORD1>-->
<KEYWORD1>require</KEYWORD1>
<!--<KEYWORD1>use</KEYWORD1>-->
<!-- Keywords related to classes and object-orientedness -->
<KEYWORD3>bless</KEYWORD3>
<!--<KEYWORD3>dbmclose</KEYWORD3>-->
<!--<KEYWORD3>dbmopen</KEYWORD3>-->
<!--<KEYWORD3>package</KEYWORD3>-->
<KEYWORD3>ref</KEYWORD3>
<KEYWORD3>tie</KEYWORD3>
<KEYWORD3>tied</KEYWORD3>
<KEYWORD3>untie</KEYWORD3>
<!--<KEYWORD3>use</KEYWORD3>-->
<!-- Low-level socket functions -->
<KEYWORD3>accept</KEYWORD3>
<KEYWORD3>bind</KEYWORD3>
<KEYWORD3>connect</KEYWORD3>
<KEYWORD3>getpeername</KEYWORD3>
<KEYWORD3>getsockname</KEYWORD3>
<KEYWORD3>getsockopt</KEYWORD3>
<KEYWORD3>listen</KEYWORD3>
<KEYWORD3>recv</KEYWORD3>
<KEYWORD3>send</KEYWORD3>
<KEYWORD3>setsockopt</KEYWORD3>
<KEYWORD3>shutdown</KEYWORD3>
<KEYWORD3>socket</KEYWORD3>
<KEYWORD3>socketpair</KEYWORD3>
<!-- System V interprocess communication functions -->
<KEYWORD3>msgctl</KEYWORD3>
<KEYWORD3>msgget</KEYWORD3>
<KEYWORD3>msgrcv</KEYWORD3>
<KEYWORD3>msgsnd</KEYWORD3>
<KEYWORD3>semctl</KEYWORD3>
<KEYWORD3>semget</KEYWORD3>
<KEYWORD3>semop</KEYWORD3>
<KEYWORD3>shmctl</KEYWORD3>
<KEYWORD3>shmget</KEYWORD3>
<KEYWORD3>shmread</KEYWORD3>
<KEYWORD3>shmwrite</KEYWORD3>
<!-- Fetching user and group info -->
<KEYWORD3>endgrent</KEYWORD3>
<KEYWORD3>endhostent</KEYWORD3>
<KEYWORD3>endnetent</KEYWORD3>
<KEYWORD3>endpwent</KEYWORD3>
<KEYWORD3>getgrent</KEYWORD3>
<KEYWORD3>getgrgid</KEYWORD3>
<KEYWORD3>getgrnam</KEYWORD3>
<KEYWORD3>getlogin</KEYWORD3>
<KEYWORD3>getpwent</KEYWORD3>
<KEYWORD3>getpwnam</KEYWORD3>
<KEYWORD3>getpwuid</KEYWORD3>
<KEYWORD3>setgrent</KEYWORD3>
<KEYWORD3>setpwent</KEYWORD3>
<!-- Fetching network info -->
<KEYWORD3>endprotoent</KEYWORD3>
<KEYWORD3>endservent</KEYWORD3>
<KEYWORD3>gethostbyaddr</KEYWORD3>
<KEYWORD3>gethostbyname</KEYWORD3>
<KEYWORD3>gethostent</KEYWORD3>
<KEYWORD3>getnetbyaddr</KEYWORD3>
<KEYWORD3>getnetbyname</KEYWORD3>
<KEYWORD3>getnetent</KEYWORD3>
<KEYWORD3>getprotobyname</KEYWORD3>
<KEYWORD3>getprotobynumber</KEYWORD3>
<KEYWORD3>getprotoent</KEYWORD3>
<KEYWORD3>getservbyname</KEYWORD3>
<KEYWORD3>getservbyport</KEYWORD3>
<KEYWORD3>getservent</KEYWORD3>
<KEYWORD3>sethostent</KEYWORD3>
<KEYWORD3>setnetent</KEYWORD3>
<KEYWORD3>setprotoent</KEYWORD3>
<KEYWORD3>setservent</KEYWORD3>
<!-- Time-related functions -->
<KEYWORD3>gmtime</KEYWORD3>
<KEYWORD3>localtime</KEYWORD3>
<KEYWORD3>time</KEYWORD3>
<!--<KEYWORD3>times</KEYWORD3>-->
<FUNCTION>sub</FUNCTION>
</KEYWORDS>
</RULES>
<RULES SET="POD" DEFAULT="COMMENT2">
<MARK_FOLLOWING TYPE="LABEL" AT_LINE_START="TRUE">=</MARK_FOLLOWING>
</RULES>
<RULES SET="LITERAL" DEFAULT="LITERAL1" ESCAPE="\">
<!-- Variables inside a Literal -->
<SPAN TYPE="KEYWORD2" NO_LINE_BREAK="TRUE" DELEGATE="VARIABLE">
<BEGIN>${</BEGIN>
<END>}</END>
</SPAN>
<!-- object method inside a Literal -->
<SPAN TYPE="KEYWORD2" NO_LINE_BREAK="TRUE" DELEGATE="VARIABLE">
<BEGIN>->{</BEGIN>
<END>}</END>
</SPAN>
<SEQ_REGEXP HASH_CHAR="$" TYPE="KEYWORD2">\$#?((\p{Alpha}\w*|_\w+)?::)*(\p{Alpha}\w*|_\w+|\d+)</SEQ_REGEXP>
<SPAN TYPE="KEYWORD2" NO_LINE_BREAK="TRUE" DELEGATE="VARIABLE">
<BEGIN>@{</BEGIN>
<END>}</END>
</SPAN>
<MARK_FOLLOWING TYPE="KEYWORD2">@</MARK_FOLLOWING>
<SPAN TYPE="KEYWORD2" NO_LINE_BREAK="TRUE" DELEGATE="VARIABLE">
<BEGIN>%{</BEGIN>
<END>}</END>
</SPAN>
<MARK_FOLLOWING TYPE="KEYWORD2">%</MARK_FOLLOWING>
<SEQ TYPE="LITERAL1">|</SEQ>
<SEQ TYPE="LITERAL1">&</SEQ>
<SEQ TYPE="LITERAL1">!</SEQ>
<SEQ TYPE="LITERAL1">></SEQ>
<SEQ TYPE="LITERAL1"><</SEQ>
<SEQ TYPE="LITERAL1">)</SEQ>
<SEQ TYPE="LITERAL1">(</SEQ>
<SEQ TYPE="LITERAL1">=</SEQ>
<SEQ TYPE="LITERAL1">!</SEQ>
<SEQ TYPE="LITERAL1">+</SEQ>
<SEQ TYPE="LITERAL1">-</SEQ>
<SEQ TYPE="LITERAL1">/</SEQ>
<SEQ TYPE="LITERAL1">*</SEQ>
<SEQ TYPE="LITERAL1">^</SEQ>
<SEQ TYPE="LITERAL1">~</SEQ>
<SEQ TYPE="LITERAL1">}</SEQ>
<SEQ TYPE="LITERAL1">{</SEQ>
<SEQ TYPE="LITERAL1">.</SEQ>
<SEQ TYPE="LITERAL1">,</SEQ>
<SEQ TYPE="LITERAL1">;</SEQ>
<SEQ TYPE="LITERAL1">]</SEQ>
<SEQ TYPE="LITERAL1">[</SEQ>
<SEQ TYPE="LITERAL1">?</SEQ>
<SEQ TYPE="LITERAL1">:</SEQ>
</RULES>
<!-- Literals framed by apostrophs -->
<RULES SET="APOSTR" DEFAULT="LITERAL1" ESCAPE="\">
<!-- just a hack for sprintf -->
<SEQ_REGEXP HASH_CHAR="%" TYPE="LITERAL4">%\d*\.?\d*[dfis]</SEQ_REGEXP>
</RULES>
<RULES SET="EXEC" DEFAULT="KEYWORD3" ESCAPE="\">
<!-- Comments -->
<EOL_SPAN TYPE="COMMENT1">#</EOL_SPAN>
<!-- Variables -->
<SPAN TYPE="KEYWORD2" NO_LINE_BREAK="TRUE">
<BEGIN>${</BEGIN>
<END>}</END>
</SPAN>
<MARK_FOLLOWING TYPE="KEYWORD2">$#</MARK_FOLLOWING>
<MARK_FOLLOWING TYPE="KEYWORD2">$</MARK_FOLLOWING>
<SPAN TYPE="KEYWORD2" NO_LINE_BREAK="TRUE">
<BEGIN>@{</BEGIN>
<END>}</END>
</SPAN>
<MARK_FOLLOWING TYPE="KEYWORD2">@</MARK_FOLLOWING>
<SPAN TYPE="KEYWORD2" NO_LINE_BREAK="TRUE">
<BEGIN>%{</BEGIN>
<END>}</END>
</SPAN>
<MARK_FOLLOWING TYPE="KEYWORD2">%</MARK_FOLLOWING>
</RULES>
<RULES SET="VARIABLE" DEFAULT="KEYWORD2" ESCAPE="\">
<SPAN TYPE="KEYWORD2" NO_LINE_BREAK="TRUE" DELEGATE="VARIABLE">
<BEGIN>{</BEGIN>
<END>}</END>
</SPAN>
<SEQ TYPE="OPERATOR">-></SEQ>
</RULES>
<!-- Used for quote-like operators; just makes sure the brackets are balanced. -->
<RULES SET="QUOTED_BRACKET" DEFAULT="LITERAL1" ESCAPE="\">
<SPAN NO_LINE_BREAK="FALSE"
TYPE="LITERAL1"
MATCH_TYPE="OPERATOR"
DELEGATE="QUOTED_BRACKET"
HASH_CHARS="[">
<BEGIN>[</BEGIN>
<END>]</END>
</SPAN>
</RULES>
<RULES SET="QUOTED_BRACE" DEFAULT="LITERAL1" ESCAPE="\">
<SPAN NO_LINE_BREAK="FALSE"
TYPE="LITERAL1"
MATCH_TYPE="OPERATOR"
DELEGATE="QUOTED_BRACE"
HASH_CHARS="{">
<BEGIN>{</BEGIN>
<END>}</END>
</SPAN>
</RULES>
<RULES SET="QUOTED_PAREN" DEFAULT="LITERAL1" ESCAPE="\">
<SPAN NO_LINE_BREAK="FALSE"
TYPE="LITERAL1"
MATCH_TYPE="OPERATOR"
DELEGATE="QUOTED_PAREN"
HASH_CHARS="(">
<BEGIN>(</BEGIN>
<END>)</END>
</SPAN>
</RULES>
</MODE>
[ zur Elbe Produktseite wechseln0.50Quellennavigators
Analyse erneut starten
]
|
