perl读取java类中方法_如何在Perl中动态构建Java类路径?

不是Perl代码(没有代码=没有错误:)但是没有

export CLASSPATH=.:lib/*

工作?在启动Java应用程序的我的BASH脚本中,这个和应用程序可以“看到”所有。我想要JAR,但是你可以把它设置成“全局”:

mn@test:~# export CLASSPATH=.:/usr/local/jars/*

mn@test:~# echo $CLASSPATH

.:/usr/local/jars/*

mn@test:~# ls /usr/local/jars/*.jar

/usr/local/jars/activation.jar ...

mn@test:/home# cat show_cp.java

public class show_cp

{

public static void main(String[] args)

{

System.out.println(System.getProperty("java.class.path", "."));

}

}

mn@test:/home# java show_cp

.:/usr/local/jars/postgresql-8.4-701.jdbc4.jar:/usr/local/jars/RmiJdbc.jar:/usr/local/...

编辑:

以及连接文件名的Perl代码:

my @files = glob "/jars/*.jar";

my $cp = join(":", @files);

print($cp)