home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 5 Edit / 05-Edit.zip / wwed034b.zip / fte-0.34 / config / m_perl.fte < prev    next >
Text File  |  1995-10-15  |  3KB  |  64 lines

  1. mode PERL: PLAIN, '\\.\\cPL|M$', '^{\\#\\! *}|{EXTPROC *}[^ ]*perl' { # PERL
  2.     HilitOn             = 1;
  3.     HilitMode           = 'PERL';
  4.     AutoIndent          = 1;
  5.     IndentMode          = 'C';
  6.     TabSize             = 8;
  7.     SpaceTabs           = 1;
  8.     MatchCase           = 1;
  9.     MultiLineHilit      = 1;
  10.  
  11.     RoutineRegexp       = '^sub\\s+';
  12.     
  13.     SaveFolds           = 2;      # save fold info at end of line
  14.     CommentStart        = ' #';
  15.     CommentEnd          = '';
  16.     
  17.     
  18.     key      [Tab]      { LineIndent LineTrim }
  19.     key      [Enter]    { LineIndent LineNew }
  20.  
  21.     key      [#]        { SelfInsert LineIndent }
  22.     key      [{]        { SelfInsert LineIndent }
  23.     key      [}]        { SelfInsert LineIndent }
  24.     key      [A-\\]     { BlockReIndent }
  25.     key      [C-O_\\]   { ChangeCIndent }
  26.     key      [C-O_{]    { ChangeCBraceOfs }
  27.   
  28.     keyword '-' {
  29.         'if', 'sub', 'return', 'while', 'for', 'elsif', 'foreach', 'else',
  30.         'unless', 'eq', 'not', 'and', 'or', 'ne', 'until', 'abs', 'accept',
  31.         'alarm', 'atan2', 'bind', 'binmode', 'bless', 'caller', 'chdir',
  32.         'chmod', 'chomp', 'chop', 'chown', 'chr', 'chroot', 'close',
  33.         'closedir', 'connect', 'cos', 'crypt', 'dbmclose', 'dbmopen',
  34.         'defined', 'delete', 'die', 'do', 'dump', 'each', 'eof', 'eval',
  35.         'exec', 'exists', 'exit', 'exp', 'fcntl', 'fileno', 'flock', 'fork',
  36.         'formline', 'getc', 'getlogin', 'getpeername', 'getpgrp', 'getppid',
  37.         'getpriority', 'getpwnam', 'getgrname', 'gethostbyname',
  38.         'getnetbyname', 'getprotobyname', 'getpwuid', 'getgrgid',
  39.         'getservbyname', 'gethostbyaddr', 'getnetbyaddr', 'getprotobynumber',
  40.         'getservbyport', 'getpwent', 'getgrent', 'gethostent', 'getnetent',
  41.         'getprotoent', 'getservent', 'setpwent', 'setgrent', 'sethostent',
  42.         'setnetent', 'setprotoent', 'setservent', 'endpwent', 'endgrent',
  43.         'endhostent', 'endnetent', 'endprotoent', 'endservent', 'getsockname',
  44.         'getsockopt', 'glob', 'gmtime', 'goto', 'grep', 'hex', 'import',
  45.         'index', 'int', 'ioctl', 'join', 'keys', 'kill', 'last', 'lc',
  46.         'lcfirst', 'length', 'link', 'listen', 'local', 'localtime', 'log',
  47.         'lstat', 'map', 'mkdir', 'msgctl', 'msgget', 'msgsnd', 'msgrcv', 'my',
  48.         'next', 'no', 'oct', 'open', 'opendir', 'ord', 'pack', 'pipe', 'pop',
  49.         'pos', 'print', 'printf', 'push', 'quotemeta', 'rand', 'read',
  50.         'readdir', 'readlink', 'recv', 'redo', 'ref', 'rename', 'require',
  51.         'reset', 'return', 'reverse', 'rewinddir', 'rindex', 'rmdir', 'scalar',
  52.         'seek', 'seekdir', 'select', 'semctl', 'semget', 'semop', 'send',
  53.         'setpgrp', 'setpriority', 'setsockopt', 'shift', 'shmctl', 'sgmget',
  54.         'shmread', 'shmwrite', 'shutdown', 'sin', 'sleep', 'socket',
  55.         'socketpair', 'sort', 'splice', 'split', 'sprintf', 'sqrt', 'srand',
  56.         'stat', 'study', 'substr', 'symlink', 'syscall', 'sysread', 'system',
  57.         'syswrite', 'tell', 'telldir', 'tie', 'time', 'times', 'truncate',
  58.         'uc', 'ucfirst', 'umask', 'undef', 'unlink', 'unpack', 'untie',
  59.         'unshift', 'use', 'utime', 'values', 'vec', 'wait', 'waitpid',
  60.         'wantarray', 'warn', 'write', 'x', 'continue', 'package', 'bootstrap',
  61.         'getgrnam', 'tan'
  62.     };
  63. }
  64.