The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Test::Pcuke::Gherkin::Node - Base class for Gherkin nodes

SYNOPSIS

        package MyClass;
    use base 'Test::Pcuke::Gherkin::Node';
    
    sub new {
                my ($class, %args) = @_;
        
                my @properties = qw{property1 property2};
                my @immutable_properties = qw{immutable1 immutable2};
        
                return $class->SUPER::new(
                        immutable_properties    => [ @immutable_properties ],
                        properties                              => [ @properties ],
                        args                                    => {%args}
                );
    }
    
    sub set_property1 {
        my ($self, $value) = @_;
        $self->_set_property('property1', $value);
    }
    
    sub property1 { $_[0]->_get_property('property1'); }
    
    #... etc.

METHODS

new

AUTHOR

Andrei V. Toutoukine, <tut at isuct.ru>

BUGS

Please report any bugs or feature requests to bug-test-pcuke-gherkin at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Test-Pcuke-Gherkin. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

SUPPORT

You can find documentation for this module with the perldoc command.

    perldoc Test::Pcuke::Gherkin::Node

You can also look for information at:

ACKNOWLEDGEMENTS

LICENSE AND COPYRIGHT

Copyright 2011 Andrei V. Toutoukine.

This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.

See http://dev.perl.org/licenses/ for more information.