view release on metacpan or  search on metacpan

lib/Decl/Template.pm  view on Meta::CPAN

=head2 parse_spanning_command

Given a spanning command string, parse out the initial word (the command) and leave the arguments (the rest).  Drop the . or +.

=cut

sub parse_spanning_command {
   my $piece = shift;
   
   $piece =~ s/^[+\.] *//;
   split m[ +], $piece, 2;
}

=head2 handle_spanning_command

Given a parsed spanning command and the value object and valuator function to be used, express the command.  This is really just
a dispatcher for a command table.

=cut

sub handle_spanning_command {