perl-embperl mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From "Gerald Richter" <rich...@ecos.de>
Subject Re: EmbPerl and Inline
Date Mon, 10 Sep 2001 15:26:28 GMT
Hi,

> Does anyone out there know why the use directive is not fully functional
> when embedded in a HTML::Embperl script ?????????????

there are nothing special with use under Embperl. After rereading your
example, I see that you are mixing [! !] and [* *], this may be the problem,
because [* *] in 1.3.x are still experimental. Try either to use only [* *]:

[*
use Balclutha::User;
*]
    <body>
[*
my $user = Balclutha::User->login($fdat{u},$fdat{p});
if (defined $user) {
*]
User: [+ $user->name +] has groups [+ $user->groups +]<br>
[* } else { *]
Invalid User/Pwd<br>
[* } *]

or not [* *] at all:

[!
use Balclutha::User;
!]
    <body>
[-
$user = Balclutha::User->login($fdat{u},$fdat{p});
-]
[$ if (defined $user) $]
User: [+ $user->name +] has groups [+ $user->groups +]<br>
[$ else $]
Invalid User/Pwd<br>
[$ endif $]

Does this change anything ?

Gerald


-------------------------------------------------------------
Gerald Richter    ecos electronic communication services gmbh
Internetconnect * Webserver/-design/-datenbanken * Consulting

Post:       Tulpenstrasse 5         D-55276 Dienheim b. Mainz
E-Mail:     richter@ecos.de         Voice:    +49 6133 925131
WWW:        http://www.ecos.de      Fax:      +49 6133 925152
-------------------------------------------------------------



---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-help@perl.apache.org


Mime
View raw message