File Coverage

blib/lib/EJS/Template/Parser.pm

Criterion	Covered	Total	%
statement	28	28	100.0
branch			n/a
condition			n/a
subroutine	8	8	100.0
pod	1	1	100.0
total	37	37	100.0

use 5.006;
use strict;
use warnings;

=head1 NAME

EJS::Template::Parser - Parser module for EJS::Template

=cut

package EJS::Template::Parser;
use base qw(EJS::Template::Base EJS::Template::IO);

use EJS::Template::Parser::Context;

=head1 Methods

=head2 parse

Parses EJS source and generates JavaScript code.

    $parser->parser($input, $output);

The C<$input> is used as the EJS source code, and the generated JavaScript code
is written out to C<$output>.

=cut

sub parse {
    my ($self, $input, $output) = @_;
    my ($in, $in_close) = EJS::Template::IO->input($input);

    my $context;

    $self->input($input, sub {
        my ($in) = @_;
        $context = EJS::Template::Parser::Context->new($self->config);

        while (my $line = <$in>) {
            $line =~ s/\r+\n?$/\n/;
            $context->read_line($line);
        }
    });

    $self->output($output, sub {
        my ($out) = @_;
        print $out $_ foreach @{$context->result};
    });

    return 1;
}

=head1 SEE ALSO

=over 4

=item * L

=back

=cut

1;