Hello!!

I have this problem: 

[perl][1] killed by natural death.
[perl][1] exiting with 0
[Tue Mar 18 13:22:34 2008] [notice] Apache/2.2.4 (Ubuntu) mod_perl/2.0.2 
Perl/v5.8.8 configured -- resuming normal operations
[perl][1] validate done.
[perl][1] Starting load.
[perl][4]    portable: ENV_VAR_PATH_SEP_CP for linux is ':'
[perl][4]    portable: SUB_FIX_JAVA_PATH => 
/usr/local/share/perl/5.8.8/Inline/Java/InlineJavaServer.jar for linux is 
default '/usr/local/share/perl/5.8.8/Inline/Java/InlineJavaServer.jar'
[perl][2]  classpath: 
/usr/local/share/perl/5.8.8/Inline/Java/InlineJavaServer.jar
[perl][1] starting JVM...
[perl][1] client/server mode
[perl][4]    portable: GOT_ALARM for linux is 'define'
[perl][4]    portable: J2SDK_BIN for linux is 'bin'
[perl][4]    portable: EXE_EXTENSION for linux is ''
[perl][4]    portable: SUB_FIX_CMD_QUOTES => 
"/usr/lib/jvm/java-1.5.0-sun-1.5.0.13/bin/java"  
org.perl.inline.java.InlineJavaServer 5 localhost 7891 true false false for 
linux is default '"/usr/lib/jvm/java-1.5.0-sun-1.5.0.13/bin/java"  
org.perl.inline.java.InlineJavaServer 5 localhost 7891 true false false'
[perl][2]  "/usr/lib/jvm/java-1.5.0-sun-1.5.0.13/bin/java"  
org.perl.inline.java.InlineJavaServer 5 localhost 7891 true false false
[perl][4]    portable: DEV_NULL for linux is '/dev/null'
[perl][4]    portable: GOT_ALARM for linux is 'define'
Exception in thread "main" java.lang.NoClassDefFoundError: 
org/perl/inline/java/InlineJavaServer

I am using mod_perl2 , apache2 , inline::java 0.52, jdk 1.5.0 and ubuntu 7.10 
I not using JNI  while building with perl Makefile.PL.

Anyone know what's going wrong and how I can fix it?

In console I don't have problem. My .pm is:

package modulos::prueba;

use Exporter;

@ISA = "Exporter";

@EXPORT = qw(consultaPrueba);

use Inline( Java => <<'END',

class Pod_1 {

String data = "data" ;

static String sdata = "static data" ;

public Pod_1(){

}

public String get_data(){

return data ;

}

public static String get_static_data(){

return sdata ;

}

public void set_data(String d){

data = d ;

}

private void priv(){

}

}

END

DEBUG => 1,

SHARED_JVM => 1, 

START_JVM => 1,

AUTOSTUDY => 1,

DIRECTORY => '/opt/rt3/share/html/clases',

);

sub consultaPrueba{

my $obj = modulos::prueba::Pod_1->new() ;


return $obj->get_data();

}

Reply via email to