从Integrity读取变量，并通过perl将其获取到sql

Question

我在公司使用PTC Integrity。这里有一个Excel文件，我需要使用Perl脚本将其传输到SQL数据库。

在Integrity本身中，有一个成员修订号。输入以下内容时，我可以看到此修订号：

echo %MKSSI_REVISION1%

在命令行中。我试图用Perl编写它，但这对我来说真的很难。 Perl脚本应在路径C:\Integrity_Sandbox\Database\Database.xlsx中查找Excel文件Database.xlsx，然后读取Member Revision编号，并将该编号写入我的SQL数据库。

有人对我如何做到这一点有任何想法吗？

编辑解决方案：

my @result = `si revisioninfo --project=/Database/project.pj ´Database.xlsm`; 
my $integrity_version = @result[2];
chomp $integrity_version;
my @fields = split(/: /,$integrity_version);
$integrity_version = @fields[1];
 chomp $integrity_version;

Answer 1

Bodaggnmo使用以下Perl代码解决了他的问题：

my @result = `si revisioninfo --project=/Database/project.pj ´Database.xlsm`; 
my $integrity_version = @result[2];
chomp $integrity_version;
my @fields = split(/: /,$integrity_version);
$integrity_version = @fields[1];
chomp $integrity_version;