Man page or keyword search:   man All Sections 1 - General Commands 2 - System Calls 3 - Subroutines, Functions 4 - Special Files 5 - File Formats 6 - Games and Screensavers 7 - Macros and Conventions 8 - Maintenence Commands 9 - Kernel Interface New Commands Server 4.4BSD AIX Alpinelinux Archlinux Aros BSDOS BSDi Bifrost CentOS Cygwin Darwin Debian DigitalUNIX DragonFly ElementaryOS Fedora FreeBSD Gentoo GhostBSD HP-UX Haiku Hurd IRIX Inferno JazzOS Kali Knoppix LinuxMint MacOSX Mageia Mandriva Manjaro Minix MirBSD NeXTSTEP NetBSD OPENSTEP OSF1 OpenBSD OpenDarwin OpenIndiana OpenMandriva OpenServer OpenSuSE OpenVMS Oracle PC-BSD Peanut Pidora Plan9 QNX Raspbian RedHat Scientific Slackware SmartOS Solaris SuSE SunOS Syllable Tru64 UNIXv7 Ubuntu Ultrix UnixWare Xenix YellowDog aLinux   5388 pages apropos Keyword Search (all sections) Output format html ascii pdf view pdf save postscript

XML::Grove::Sub(3)    User Contributed Perl Documentation   XML::Grove::Sub(3)

NAME
       XML::Grove::Sub - run a filter sub over a grove

SYNOPSIS
	use XML::Grove::Sub;

	# Using filter method on XML::Grove::Document or XML::Grove::Element:
	@results = $grove_object->filter(\&sub [, ...]);

	# Using an XML::Grove::Sub instance:
	$filterer = XML::Grove::Sub->new();
	@results = $grove_object->accept($filterer, \&sub [, ...]);

DESCRIPTION
       "XML::Grove::Sub" executes a sub, the filter, over all objects in a
       grove and returns a list of all the return values from the sub.	The
       sub is called with the grove object as it's first parameter and passing
       the rest of the arguments to the call to `"filter()"' or `"accept()"'.

EXAMPLE
       The following filter will return a list of all `"foo"' or `"bar"' ele-
       ments with an attribute `"widget-no"' beginning with `"A"' or `"B"'.

	 @results = $grove_obj->filter(sub {
	     my $obj = shift;

	     if ($obj->isa('XML::Grove::Element')
		 && (($obj->{Name} eq 'foo')
		     || ($obj->{Name} eq 'bar'))
		 && ($obj->{Attributes}{'widget-no'} =~ /^[AB]/)) {
		 return ($obj);
	     }
	     return ();
	 });

AUTHOR
       Ken MacLeod, ken@bitsko.slc.ut.us

SEE ALSO
       perl(1), XML::Grove(3), Data::Grove::Visitor(3)

       Extensible Markup Language (XML) <http://www.w3c.org/XML>

perl v5.8.8			  1999-08-25		    XML::Grove::Sub(3)

                             _         _         _ 
                            | |       | |       | |     
                            | |       | |       | |     
                         __ | | __ __ | | __ __ | | __  
                         \ \| |/ / \ \| |/ / \ \| |/ /  
                          \ \ / /   \ \ / /   \ \ / /   
                           \   /     \   /     \   /    
                            \_/       \_/       \_/ 

Vote for polarhome