Lexilla tests.

1 files changed, 31 insertions, 0 deletions

diff --git a/lexilla/test/examples/perl/SciTE.properties b/lexilla/test/examples/perl/SciTE.properties
new file mode 100644
index 000000000..0aefae2c9
--- /dev/null
+++ b/lexilla/test/examples/perl/SciTE.properties
@@ -0,0 +1,31 @@
+lexer.*.pl=perl
+keywords.*.pl=\
+NULL __FILE__ __LINE__ __PACKAGE__ __DATA__ __END__ AUTOLOAD \
+BEGIN CORE DESTROY END EQ GE GT INIT LE LT NE CHECK abs accept \
+alarm and atan2 bind binmode bless caller chdir chmod chomp chop \
+chown chr chroot close closedir cmp connect continue cos crypt \
+dbmclose dbmopen defined delete die do dump each else elsif endgrent \
+endhostent endnetent endprotoent endpwent endservent eof eq eval \
+exec exists exit exp fcntl fileno flock for foreach 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 grep gt hex if index \
+int ioctl join keys kill last lc lcfirst le length link listen \
+local localtime lock log lstat lt map mkdir msgctl msgget msgrcv \
+msgsnd my ne next no not oct open opendir or ord our pack package \
+pipe pop pos print printf prototype push quotemeta qu \
+rand read readdir readline readlink readpipe recv redo \
+ref rename require reset return reverse rewinddir rindex rmdir \
+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 splice split sprintf sqrt srand \
+stat study sub substr symlink syscall sysopen sysread sysseek \
+system syswrite tell telldir tie tied time times truncate \
+uc ucfirst umask undef unless unlink unpack unshift untie until \
+use utime values vec wait waitpid wantarray warn while write \
+xor \
+given when default break say state UNITCHECK __SUB__ fc
+