NAME

Syntax::Highlight::Shell - Highlight shell scripts

VERSION

Version 0.04

SYNOPSIS

    use Syntax::Highlight::Shell;

    my $highlighter = new Syntax::Highlight::Shell;
    $output = $highlighter->parse($script);

If $script contains the following shell code:

    # an if statement
    if [ -f /etc/passwd ]; then
        grep $USER /etc/passwd | awk -F: '{print $5}' /etc/passwd
    fi

then the resulting HTML contained in $output will render like this:

DESCRIPTION

This module is designed to take shell scripts and highlight them in HTML with meaningful colours using CSS. The resulting HTML output is ready for inclusion in a web page. Note that no reformating is done, all spaces are preserved.

METHODS

new(): The constructor. Returns a "Syntax::Highlight::Shell" object, which derives from "Shell::Parser".
Options

"nnn" - Activate line numbering. Default value: 0 (disabled).
"pre" - Surround result by "<pre>...</pre>" tags. Default value: 1 (enabled).
"syntax" - Selects the shell syntax. Check the documentation about the "syntax()" method in "Shell::Parser" documentation for more information on the available syntaxes. Default value: "bourne".
"tabs" - When given a non-nul value, converts tabulations to this number of spaces. Default value: 4.

Example

To avoid surrounding the result by the "<pre>...</pre>" tags:

    my $highlighter = Syntax::Highlight::Shell->new(pre => 0);

parse()

Parse the shell code given in argument and returns the corresponding HTML code, ready for inclusion in a web page.

Examples

    $html = $highlighter->parse(q{ echo "hello world" });

    $html = $highlighter->parse(<<'END');
        # find my name
        if [ -f /etc/passwd ]; then
            grep $USER /etc/passwd | awk -F: '{print $5}' /etc/passwd
        fi
    END

Internal Methods

The following methods are for internal use only.

_generic_highlight(): "Shell::Parser" callback that does all the work of highlighting the code.

NOTES

The resulting HTML uses CSS to colourize the syntax. Here are the classes that you can define in your stylesheet.

".s-key" - for shell keywords, like "if", "for", "while", "do"...
".s-blt" - for the builtins commands
".s-cmd" - for the external commands
".s-arg" - for the command arguments
".s-mta" - for shell metacharacters, like "|", ">", "\", "&"
".s-quo" - for the single ("'") and double (""") quotes
".s-var" - for expanded variables: $VARIABLE
".s-avr" - for assigned variables: "VARIABLE=value"
".s-val" - for shell values (inside quotes)
".s-cmt" - for shell comments

An example stylesheet can be found in examples/shell-syntax.css.

EXAMPLE

Here is an example of generated HTML output. It was generated with the script eg/highlight.pl.

The following shell script

    #!/bin/sh
    
    user="$1"
    
    case "$user" in
      # check if the user is root
      'root')
        echo "You are the BOFH."
        ;;
    
      # for normal users, grep throught /etc/passwd
      *)
        passwd=/etc/passwd
        if [ -f $passwd ]; then 
            grep "$user" $passwd | awk -F: '{print $5}'
        else
            echo "No $passwd"
        fi
    esac

will be rendered like this (using the CSS stylesheet eg/shell-syntax.css):

CAVEATS

"Syntax::Highlight::Shell" relies on "Shell::Parser" for parsing the shell code and therefore suffers from the same limitations.

AUTHOR

Sébastien Aperghis-Tramoni, <sebastien@aperghis.net>

BUGS

Please report any bugs or feature requests to "bug-syntax-highlight-shell@rt.cpan.org", or through the web interface at <https://rt.cpan.org/NoAuth/ReportBug.html?Queue=Syntax-Highlight-Shell>. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

COPYRIGHT & LICENSE

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.