> try:
>
> http://presse.avmz.uni-siegen.de/foo/page1.perl
> (configured with HTML::EmbperlObject, using object methods)
>
Oooops, sorry it's my fault. The example is wrong. The call to new must be
inside a [- -] block, otherwise it's called before the object is correctly
blessed. Sorry, again
Gerald
[!
sub new
{
my $self = shift ;
# here we attach some data to the request object
$self -> {fontsize} = 3 ;
}
# Here we give a default title
sub title { 'Title not given' } ;
!]
[-
$req = shift ;
# here we call the method new
$req -> new ;
-]
-------------------------------------------------------------
Gerald Richter ecos electronic communication services gmbh
Internetconnect * Webserver/-design/-datenbanken * Consulting
Post: Tulpenstrasse 5 D-55276 Dienheim b. Mainz
E-Mail: [EMAIL PROTECTED] Voice: +49 6133 925151
WWW: http://www.ecos.de Fax: +49 6133 925152
-------------------------------------------------------------
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
