<document exts="pl;pm" langs="Perl">

<item name="options" wrap="0" xml_format="1"></item>

<item name="keywords" type="keywords" color="keywords" fontstyle="bold">\b(\bmy|chdir|chomp|close|closedir|continue|defined|die|do|elsif|eof|eval|exists|foreach|getpwnam|given|glob|goto|grep|if|import|join|last|last|length|local|next|open|pop|print|printf|push|readline|redo|require|reset|return|say|scalar|shift|split|split|stat|sub|syscall|system|undef|unimport|unless|until|use|wait|waitpid|wantarray|warn|when|while)\b</item>

<item name="quotes" type="item" color="quotes">("[^\"]*")</item>

<item name="char" type="item" color="quotes">('[^']*')</item>

<item name="single comment" type="item" color="single comment" fontstyle="italic">#[^\n]*</item>

<item name="cm_single" type="comment">#%s</item>

<item name="mcomment-start" type="mcomment-start" color="mcomment-start" fontstyle="italic">=begin*</item>

<item name="mcomment-end" type="mcomment-end">*=end</item>

</document>