NAME
PYX::Stack - Processing PYX data or file and process element stack.
SYNOPSIS
use PYX::Stack;
my $obj = PYX::Stack->new(%parameters);
$obj->parse($pyx, $out);
$obj->parse_file($input_file, $out);
$obj->parse_handler($input_file_handler, $out);
METHODS
new
my $obj = PYX::Stack->new(%parameters);
Constructor.
bad_end
Check bad end of element. If set, print error on unopened end of element.
Default value is 0.
output_handler
Output handler.
Default value is \*STDOUT.
verbose
Verbose flag. If set, each start element prints information to 'output_handler'.
Default value is 0.
Returns instance of object.
parse
$obj->parse($pyx, $out);
Parse PYX text or array of PYX text. If $out
not present, use 'output_handler'.
Returns undef.
parse_file
$obj->parse_file($input_file, $out);
Parse file with PYX data. If $out
not present, use 'output_handler'.
Returns undef.
parse_handler
$obj->parse_handler($input_file_handler, $out);
Parse PYX defined by handler. If $out
not present, use 'output_handler'.
Returns undef.
ERRORS
new():
From Class::Utils::set_params():
Unknown parameter '%s'.
parse():
Bad end of element.
Element: %s
Stack has some elements.
parse_file():
Bad end of element.
Element: %s
Stack has some elements.
parse_handler():
Bad end of element.
Element: %s
Stack has some elements.
EXAMPLE1
use strict;
use warnings;
use PYX::Stack;
# Example data.
my $pyx = <<'END';
(begin
(middle
(end
-data
)end
)middle
)begin
END
# PYX::Stack object.
my $obj = PYX::Stack->new(
'verbose' => 1,
);
# Parse.
$obj->parse($pyx);
# Output:
# begin
# begin/middle
# begin/middle/end
# begin/middle
# begin
EXAMPLE2
use strict;
use warnings;
use Error::Pure;
use PYX::Stack;
# Error output.
$Error::Pure::TYPE = 'PrintVar';
# Example data.
my $pyx = <<'END';
(begin
(middle
(end
-data
)middle
)begin
END
# PYX::Stack object.
my $obj = PYX::Stack->new;
# Parse.
$obj->parse($pyx);
# Output:
# PYX::Stack: Stack has some elements.
EXAMPLE3
use strict;
use warnings;
use Error::Pure;
use PYX::Stack;
# Error output.
$Error::Pure::TYPE = 'PrintVar';
# Example data.
my $pyx = <<'END';
(begin
(middle
-data
)end
)middle
)begin
END
# PYX::Stack object.
my $obj = PYX::Stack->new(
'bad_end' => 1,
);
# Parse.
$obj->parse($pyx);
# Output:
# PYX::Stack: Bad end of element.
# Element: end
DEPENDENCIES
Class::Utils, Error::Pure, PYX::Parser.
SEE ALSO
- Task::PYX
-
Install the PYX modules.
REPOSITORY
https://github.com/michal-josef-spacek/PYX-Stack
AUTHOR
Michal Josef Špaček mailto:skim@cpan.org
LICENSE AND COPYRIGHT
© 2011-2023 Michal Josef Špaček
BSD 2-Clause License
VERSION
0.06