[!
sub new
{
my $self = shift ;
$self -> {fontsize} = 9 ;
$self -> {copyright} = 'Gerald Richter / ecos (c) 2000 [page 4]' ;
}
!]
[$ sub title $]<b>Embperl sub in title </b>[$endsub$]
PAGE 4 [!
sub new
{
my $self = shift ;
$self -> {fontsize} = 9 ;
$self -> {copyright} = 'Gerald Richter / ecos (c) 2000 [page 4]' ;
}
!]
[$ sub title $]<b>Embperl sub in title </b>[$endsub$]
PAGE 4