;{}

[Keywords]
keywords=bless|close|closedir|die|eval|exit|grep|local|map|my|open|opendir|package|print|require|return|splice|split|sub|sysopen|use|warn|
Flow Keywords=do|each|else|elsif|for|foreach|if|unless|until|values|while|
Functions=a|abs|accept|alarm|and|atan2|AUTOLOAD|b|BEGIN|bind|binmode|caller|chdir|chmod|chomp|chop|chown|chr|chroot|cmp|connect|continue|CORE|cos|crypt|dbmclose|dbmopen|default|defined|delete|DESTROY|dump|END|endgrent|endhostent|endnetent|endprotoent|endpwent|endservent|eof|eq|exec|exists|exp|fcntl|fileno|flock|fork|format|formline|ge|getc|getgrent|getgrgid|getgrnam|gethostbyaddr|gethostbyname|gethostent|getlogin|getnetbyaddr|getnetbyname|getnetent|getpeername|getpgrp|getppid|getpriority|getprotobyname|getprotobynumber|getprotoent|getpwent|getpwnam|getpwuid|getservbyname|getservbyport|getservent|getsockname|getsockopt|glob|gmtime|goto|gt|hex|import|index|int|ioctl|join|keys|kill|last|lc|lcfirst|le|length|link|listen|local|localtime|log|lstat|lt|m|mkdir|msgctl|msgget|msgrcv|msgsnd|ne|ne|new|next|no|not|oct|or|ord|pack|pipe|pop|pos|printf|q|qq|quotemeta|qw|qx|rand|read|readdir|readlink|readpipe|recv|redo|ref|rename|reset|reverse|rewinddir|rindex|rmdir|s|scalar|seek|seekdir|select|semctl|semget|semop|send|setgrent|sethostent|setnetent|setpgrp|setpriority|setprotoent|setpwent|setservent|setsockopt|shift|shmctl|shmget|shmread|shmwrite|shutdown|sin|sleep|socket|socketpair|sort|split|sprintf|sqrt|srand|stat|STDERR|STDIN|STDOUT|study|substr|switch|symlink|syscall|sysread|system|system|syswrite|tell|telldir|time|times|tr|truncate|uc|ucfirst|umask|undef|unlink|unpack|unshift|untie|utime|wait|waitpid|wantarray|vec|write|x|xor|y|

[Options]
LineCommentA=#
CommentStartA==pod
CommentEndA==cut
Char='
String="
Escape=\
AllowEscapeOutsideString=1
Symbols=~!^*()+-=|/{}[]:;,.?
Numbers=0123456789
AddProjectClassesToCompletion=1
AutoCloseBraceStart=(["'
AutoCloseBraceEnd=)]"'
AutoCloseBlockStart={
AutoCloseBlockEnd=}

[FoldOptions]
List_AsMethod=sub
Separators=;()
Case=1

[Region]
Start=start_region
End=end_region
CommentStart=#

[Block]
1_Name=Variable $
1_OnLine=1
1_AsString=1
1_Start=$
1_End=
2_Name=Variable @
2_OnLine=1
2_AsString=1
2_Start=@
2_End=
3_Name=Variable %
3_OnLine=1
3_AsString=1
3_Start=%
3_End=

[Fold]
1_Id=
1_Begin={
1_End=}
1_EndBefore=} else
1_Section=
1_NoParentOfId=0
1_ListItem=
2_Id==pod
2_Begin=
2_End==cut
2_EndBefore=
2_Section=
2_NoParentOfId=0
2_ListItem=

