如何在域模式下将属性文件加载到JBoss7中

我们的早期开发是在独立模式下进行的，其中可以在命令行中包含属性文件

现在我们正在进行部署，服务器将处于域模式，但handy命令行属性不再起作用

我看到属性可以与domain.xml一起加载或放在domain.xml中，但它们的形式与标准属性文件不同。我不想更改该文件，因为其他程序使用相同的文件

我是不是忽略了什么？Perl是我的朋友

#!/usr/bin/perl

# this perl script takes a standard property file and makes a jboss cli file to load properties

$machine = $ENV{'PHYSICAL_MACHINE'};

print "connect $ENV{'TARGET_HOSTNAME'}.domain.com\n";

while (<>)
{
 my($line) = $_;

chomp($line);
#remove DOS line endings
chop($line) if ($line =~ m/\r$/);

# skip commented lines
next if ( $line =~ /^#/);

if($line)
{ 
    my(@parts) = split /=/, $line;

    $propName=@parts[0];
    $propval=@parts[1];

    print "\nif (outcome != success) of /host=$machine/server-config=XXX-server/system-property=$propName:read-resource\n";
    print "    /host=$machine/server-config=XXX-server/system-property=$propName:add(value=$propval)\n";
    print "else\n";
    print "    /host=$machine/server-config=XXX-server/system-property=$propName:write-attribute(name=value, value=$propval)\n";
    print "end-if\n";
}
}

#/usr/bin/perl
#此perl脚本获取一个标准属性文件，并生成一个jboss cli文件来加载属性
$machine=$ENV{'PHYSICAL_machine'}；
打印“connect$ENV{'TARGET_HOSTNAME'}.domain.com\n”；
而（）
{
我的（$line）=$\；
chomp（$line）；
#删除DOS行结束符
如果（$line=~m/\r$/），则切掉（$line）；
#跳过注释行
下一个if（$line=~/^#/）；
如果（$行）
{ 
我的（@parts）=拆分/=/，$line；
$propName=@parts[0]；
$propval=@parts[1]；
打印“\nif（output！=success）of/host=$machine/server config=XXX server/system property=$propName:read resource\n”；
打印“/host=$machine/server config=XXX服务器/系统属性=$propName:add（value=$propval）\n”；
打印“else\n”；
打印“/host=$machine/server config=XXX服务器/系统属性=$propName:write属性（name=value，value=$propval）\n”；
打印“如果结束\n”；
}
}