view Lib/IMPL/DOM/Schema/AnyNode.pm @ 99:6dd659f6f66c

Minor changes, DOM schema is in development (in the aspect of a forms)
author wizard
date Wed, 05 May 2010 17:33:55 +0400 (2010-05-05)
parents 16ada169ca75
children 76515373dac0
line wrap: on
line source
package IMPL::DOM::Schema::AnyNode;
use strict;
use warnings;

use base qw(IMPL::DOM::Schema::Node);

our %CTOR = (
    'IMPL::DOM::Schema::Node' => sub {
        my %args = @_;
        $args{nodeName} ||= 'AnyNode';
        $args{name} = '::any';
        
        %args;
    }
);

1;

__END__

=pod

=head1 DESCRIPTION

���� � ������������ ������, ��� ����� ���� ������������� ����������� ��������
� �����������.

� ����������� ���� C<IMPL::DOM::Schema::NodeSet> ���� ���� ����� ������������ ������ ���� ���
������ ��� ������������� ��������� ������������� ���� C<IMPL::DOM::Schema::SwitchNode>.

� ����������� ���� �<IMPL::DOM::Schema::NodeList> ������ ���� ����� ����������� ��������� ���
��� ������� ����� ������ ��� ������������������ ������������ ����� � ����� �����.

<NodeList>
    <SimpleNode name="firstName"/>
    <SimpleNode name="age"/>
    <AnyNode type="Notes" minOccur="0" maxOccur="unbounded"/>
    <Node name="primaryAddress" type="Address"/>
    <AnyNode/>
</NodeList>

=cut