如何将从perl脚本检索到的用户名作为参数传递给另一个exe文件?

时间:2013-01-27 13:50:06

标签: perl

如何将变量user_name作为参数传递给exe文件file.exe?另外,告诉我是否真的会使用getusername命令从记帐开始数据包中获取用户名。

#!/usr/bin/perl
use warnings;
use strict;
my $user_name;

print "Hello radiator is executing the exe file...\n";


my $user_name = $p->getUserName;
open my $EX1_PIPE, '|-', 'file.exe'
        or die $!;

print $EX1_PIPE "$_\n"   # i dont know what this line is for
       for qw/username password/;  #  i dont know what this line is for

close $EX1_PIPE or die $!;

1 个答案:

答案 0 :(得分:1)

open正在运行该命令,因此您只需要调用该命令即可 与所需的论点:

open my $EX1_PIPE, '|-', "file.exe $user_name" or die "file.exe $!\n";

另一方面,鉴于您的评论,您似乎想要传递用户名 作为脚本的输入。如果是这种情况,也许您正在寻找:

print $EX1_PIPE "$_\n" for ($user_name $password);

(您需要定义名为$password)的变量