Strange error in Embperl code. Newbie is probably missing something significant!

[Scott Chapman <sc...@mischko.com>]

I have this line in my Embperl code, calling on a routine defined in 
constants.epl in EmbperlObject.
           if ($req->{check_email_addr} ($fdat{User_Email})) {

I get this error back:
[515]ERR: 24: Line 9: Error in Perl code: syntax error at /wwww/htdocs/userpass.epl line 57, near "} ("

Apache/1.3.22 (Unix) mod_perl/1.26 HTML::Embperl 1.3.3 [Wed Nov 21 13:30:09 2001]

I've tried tinkering with it and I can't figure it out. Apparently it doesn't like 
the way I'm passing a parameter to this check_email_addr subroutine?

What am I missing?

Cordially,
Scott

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

Re: Strange error in Embperl code. Newbie is probably missing something significant!

[Gerald Richter <ri...@ecos.de>]

> I have this line in my Embperl code, calling on a routine defined in 
> constants.epl in EmbperlObject.
>            if ($req->{check_email_addr} ($fdat{User_Email})) {
> 

If check_email_addr is a code ref, use

            if (&{$req->{check_email_addr}} ($fdat{User_Email})) {

if this is not what you need, show us how you define check_email_addr

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