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: [EMAIL PROTECTED] Voice: +49 6133 925131
WWW: http://www.ecos.de Fax: +49 6133 925152
-------------------------------------------------------------
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
