Hello EmbPerl,
I have these files:
/constants.epl
/topbar/base.epl
/main/base.epl
constants.epl:
[!
use Carp;
$req = shift;
$req->{appname} = "test app";
!]
I need to execute constants in both bases. Execute('../constants.epl') doesn`t
work. How can I do it?
Hi,
Two simple and supposedly equivalent scripts follow:
Script 1: test.pl
##
use Balclutha::User;
my $user = Balclutha::User->login($ARGV[0], $ARGV[1]);
if (defined $user) {
print join ' ', $user->name, ' has groups ', $user->groups, "\n";
}
else {
print "invalid user/pwd\n";
}
>> SetEnv EMBPERL_OPTIONS 272
>>
GR> This sets
GR> optRawInput = 16
GR> optDisableFormData = 256
GR> so if you disable the setup of form data (%fdat), you shouldn't wonder if
GR> Embperl does what you say :-)
Oh god! I`m so stupid! :-)
I`m really ashamed of it! :-0 Thanks
Regards
Lukas Zap
>
> I'm trying to make a recordset persistent so that it doesn't have to
> repeatedly load the meta-data and type translation code every time a
> page loads. However it appears that the code in Embperl.pm deletes
> recordsets without checking to see whether I've added them to the
> CLEANUP hash.
-BEGIN PGP SIGNED MESSAGE-
Hash: SHA1
I'm trying to make a recordset persistent so that it doesn't have to
repeatedly load the meta-data and type translation code every time a
page loads. However it appears that the code in Embperl.pm deletes
recordsets without checking to see whether
