view release on metacpan or  search on metacpan

lib/Text/Highlight/Perl.pm  view on Meta::CPAN

package Text::Highlight::Perl;
use strict;

sub syntax
{
	return {
          'name' => 'Perl',
          'blockCommentOn' => [],
          'case' => 1,
          'key3' => {
                      'ne' => 1,
                      'tr' => 1,
                      'le' => 1,
                      'not' => 1,
                      'x' => 1,
                      'y' => 1,
                      'or' => 1,
                      'eq' => 1,
                      'qw' => 1,
                      'qq' => 1,
                      'm' => 1,
                      's' => 1,
                      'cmp' => 1,
                      'lt' => 1,
                      'xor' => 1,
                      'gt' => 1,
                      'q' => 1,
                      'qx' => 1,
                      'and' => 1,
                      'ge' => 1
                    },
          'key2' => {
                      'scalar' => 1,
                      'sqrt' => 1,
                      'print' => 1,
                      'getppid' => 1,
                      'vec' => 1,
                      'rename' => 1,
                      'chop' => 1,
                      'caller' => 1,
                      'wantarray' => 1,
                      'each' => 1,
                      'undef' => 1,
                      'stat' => 1,
                      'open' => 1,
                      'getpwuid' => 1,
                      'setpriority' => 1,
                      'flock' => 1,
                      'eof' => 1,
                      'delete' => 1,
                      'rindex' => 1,
                      'getpwent' => 1,
                      'getpeername' => 1,
                      'quotemeta' => 1,
                      'tied' => 1,
                      'setnetent' => 1,
                      'system' => 1,
                      'time' => 1,
                      'shmget' => 1,
                      'die' => 1,
                      'getprotobyname' => 1,
                      'unshift' => 1,
                      'warn' => 1,
                      'uc' => 1,
                      'getprotobynumber' => 1,
                      'getpriority' => 1,
                      'ord' => 1,
                      'truncate' => 1,
                      'getlogin' => 1,
                      'sort' => 1,
                      'length' => 1,
                      'index' => 1,
                      'bless' => 1,
                      'wait' => 1,
                      'chdir' => 1,
                      'shmwrite' => 1,
                      'seekdir' => 1,
                      'exists' => 1,
                      'opendir' => 1,
                      'shmread' => 1,
                      'exit' => 1,
                      'substr' => 1,
                      'no' => 1,
                      'kill' => 1,
                      'unlink' => 1,
                      'readdir' => 1,
                      'grep' => 1,
                      'getservent' => 1,
                      'write' => 1,
                      'split' => 1,
                      'exp' => 1,
                      'ioctl' => 1,
                      'values' => 1,
                      'getservbyname' => 1,
                      'setsockopt' => 1,
                      'setprotoent' => 1,
                      'sin' => 1,
                      'push' => 1,
                      'shift' => 1,
                      'pack' => 1,
                      'hex' => 1,
                      'endprotoent' => 1,
                      'setgrent' => 1,
                      'getpgrp' => 1,
                      'msgctl' => 1,
                      'msgrcv' => 1,