#
# antxmlgen.pl
#
# カレントディレクトリの.classpath(EclipseのCLASSPATH設定ファイル)と、
# コマンドラインのクラス(完全パッケージ修飾)から、
# そのクラスをJavaアプリケーションとして実行できるAnt build.xmlファイル記述を
# 作成し、標準出力に出力します。
# 実行タスク名は run です。
#
# 2004/07/04
#
(($className) = @ARGV) || die "class name expected.";
open(INFILE, "./.classpath") || die "cannot open .classpath: $!";
print <<HEADER;
<?xml version="1.0" encoding="UTF-8"?>
<project name="default_project" default="run" basedir=".">
<property name="classpath" value="." />
<target name="run">
<java classname="$className" fork="yes">
<classpath>
<pathelement path="${classpath}" />
HEADER
while(<INFILE>){
if(/<classpathentry kind="lib" path="(.+)"\/>/){
$jar = $1;
print <<JAR;
<pathelement location="$jar" />
JAR
}
}
print <<FOOTER;
</classpath>
<!--
<arg value="aaa" />
-->
</java>
</target>
</project>
FOOTER
close(INFILE);
# end.
|