Text-TemplateFill
view release on metacpan - search on metacpan
view release on metacpan or search on metacpan
TemplateFill.pm view on Meta::CPAN
'EndPageSeq' => '', # Probably \f, else use many empty lines
'PageLen' => 66, # Length of output page
'Variables' => \%ProgVars, # Hash of all program variables
'CalcVars' => \%CalcVars, # Hash of all calculated variables
'Paragraphs' => \%Paragraphs, # Hash of all paragraphs
'StartPageTag' => ' ', # Which tag to use to auto start a page, undef doesn't work - space is dodge
'EndPageTag' => ' ', # Which tag to use to auto end a page
'CalcHandle' => $CalcHandle, # For calculations
);
return bless \%template => $class;
}
# Set an option in the %template.
sub SetOpt {
my $self = shift @_;
while($#_ > 0) {
&Error($self, "Unknown option '$_[0]'") unless(defined($self->{$_[0]}));
&Error($self, "No value to option '$_[0]'") unless(defined($_[1]));
$self->{$_[0]} = $_[1];
view all matches for this distributionview release on metacpan - search on metacpan
( run in 2.574 seconds using v1.00-cache-2.02-grep-82fe00e-cpan-d29e8ade9f55 )