shBrushPerl.js - rails-4.2.4 Documentation

    SyntaxHighlighter
    http://alexgorbatchev.com/SyntaxHighlighter

    SyntaxHighlighter is donationware. If you are using it, please donate.
    http://alexgorbatchev.com/SyntaxHighlighter/donate.html

    @version
    3.0.83 (July 02 2010)

    @copyright
    Copyright (C) 2004-2010 Alex Gorbatchev.

    @license
    Dual licensed under the MIT and GPL licenses.

;(function() {

    // CommonJS
    typeof(require) != 'undefined' ? SyntaxHighlighter = require('shCore').SyntaxHighlighter : null;

    function Brush()
    {
            // Contributed by David Simmons-Duffin and Marty Kube

            var funcs =
                    'abs accept alarm atan2 bind binmode chdir chmod chomp chop chown chr ' +
                    'chroot close closedir connect cos crypt defined delete each endgrent ' +
                    'endhostent endnetent endprotoent endpwent endservent eof exec exists ' +
                    'exp fcntl fileno flock fork format formline 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 grep hex index int ioctl join keys kill lc lcfirst length link ' +
                    'listen localtime lock log lstat map mkdir msgctl msgget msgrcv msgsnd ' +
                    'oct open opendir ord pack pipe pop pos print printf prototype push ' +
                    'quotemeta rand read readdir readline readlink readpipe recv rename ' +
                    'reset 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 substr symlink syscall sysopen sysread sysseek ' +
                    'system syswrite tell telldir time times tr truncate uc ucfirst umask ' +
                    'undef unlink unpack unshift utime values vec wait waitpid warn write';

            var keywords =
                    'bless caller continue dbmclose dbmopen die do dump else elsif eval exit ' +
                    'for foreach goto if import last local my next no our package redo ref ' +
                    'require return sub tie tied unless untie until use wantarray while';

            this.regexList = [
                    { regex: new RegExp('#[^!].*$', 'gm'),                                  css: 'comments' },
                    { regex: new RegExp('^\\s*#!.*$', 'gm'),                                css: 'preprocessor' }, // shebang
                    { regex: SyntaxHighlighter.regexLib.doubleQuotedString, css: 'string' },
                    { regex: SyntaxHighlighter.regexLib.singleQuotedString, css: 'string' },
                    { regex: new RegExp('(\\$|@|%)\\w+', 'g'),                              css: 'variable' },
                    { regex: new RegExp(this.getKeywords(funcs), 'gmi'),    css: 'functions' },
                    { regex: new RegExp(this.getKeywords(keywords), 'gm'),  css: 'keyword' }
                ];

            this.forHtmlScript(SyntaxHighlighter.regexLib.phpScriptTags);
    }

    Brush.prototype = new SyntaxHighlighter.Highlighter();
    Brush.aliases           = ['perl', 'Perl', 'pl'];

    SyntaxHighlighter.brushes.Perl = Brush;

    // CommonJS
    typeof(exports) != 'undefined' ? exports.Brush = Brush : null;

})();