Hi Wim,

At 10:36 AM 4/19/2000 -0700, you wrote:
 > While I'm quite new to embperl (but using it daily), I think I've seen this.
 > It seems like the [+ +] block isn't seeing the $mvar of the [- -] block.

Thanks for the pointer. I tried it out, but unfortunately it didn't fix it. 
I even changed the code as follows:

<html>
<head>
<title>Some Plain tests for Embperl</title>
</head>

<body>

[-
use strict;
use vars qw ($mvar);
use foo;
$mvar = foo->new();
$mvar->print_value();
-]
[$ if ($mvar) $]
[+ #$mvar->print_value() +]
[$ else $]
mvar undefined!
[$ endif $]

</body>
</html>


Still got the same error:

[Wed Apr 19 01:40:36 2000] [error] [550]ERR: 24: Line 8: Error in Perl 
code: Can't call method "print_value" without a package or object reference 
at /usr/local/apache/htdocs/embperl/test.html line 13.

It does seem like it found foo, or I should have seen the "can't find foo 
in @INC" error. But it doesn't seem to be executing new(); I put in some 
code to write a line to a file with 777 permissions, and nothing was 
appended to the file. If new() was not executed, that would explain why 
$mvar was not an object reference.

Thanks again for your suggestions.


steve



---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to