Mercurial > pub > Impl
diff Lib/IMPL/DOM/Navigator/Builder.pm @ 12:955b2324c1bf
Работа над навигаторами и схемой DOM модели
author | Sergey |
---|---|
date | Mon, 31 Aug 2009 01:37:43 +0400 |
parents | |
children | bb8d67f811ea |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Lib/IMPL/DOM/Navigator/Builder.pm Mon Aug 31 01:37:43 2009 +0400 @@ -0,0 +1,38 @@ +package IMPL::DOM::Navigator::Builder; +use strict; +use warnings; + +use base qw(IMPL::DOM::Navigator); + +use IMPL::Class::Property; + +BEGIN { + public property SchemaNavigator => prop_get | owner_set; +} + +1; + +=pod + +=head1 SYNOPSIS + +my $nav = new IMPL::DOM::Navigator::Builder(Schema => $mySchema); + +# set position to root +$nav->InitRoot(); + +# go to node 'Person' and create one if not exists +$nav->NavigateAuto("Person"); + +# set some node properties +$nav->nodeCurrent->Name("Smith"); +$nav->nodeCurrent->Age("20"); + +# navigate to node 'Address' and create one if not exists +$nav->NavigateAuto("Address"); + +=head1 DESCRIPTION + +, + +=cut \ No newline at end of file