1 #============================================================= -*-Perl-*-
6 # Module implementing specific nodes in a Pod::POM, subclassed from
10 # Andy Wardley <abw@kfs.org>
11 # Andrew Ford <a.ford@ford-mason.co.uk>
14 # Copyright (C) 2000, 2001 Andy Wardley. All Rights Reserved.
15 # Copyright (C) 2009 Andrew Ford. All Rights Reserved.
17 # This module is free software; you can redistribute it and/or
18 # modify it under the same terms as Perl itself.
21 # $Id: For.pm 76 2009-08-20 20:41:33Z ford $
23 #========================================================================
25 package BASIS::Pod::POM::Node::For;
29 use parent qw( BASIS::Pod::POM::Node );
30 use vars qw( %ATTRIBS $ERROR );
32 %ATTRIBS = ( format => undef, text => '' );
38 return $class->SUPER::new($pom, split(/\s+/, $text, 2));
53 This module implements a specialization of the node class to represent C<=for> elements.
57 Andrew Ford E<lt>a.ford@ford-mason.co.ukE<gt>
59 Andy Wardley E<lt>abw@kfs.orgE<gt>
63 Copyright (C) 2000, 2001 Andy Wardley. All Rights Reserved.
65 Copyright (C) 2009 Andrew Ford. All Rights Reserved.
67 This module is free software; you can redistribute it and/or
68 modify it under the same terms as Perl itself.
72 Consult L<Pod::POM::Node> for a discussion of nodes.