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

Question

如何将变量作为参数传递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 $!;

Answer 1

open正在运行命令，因此您只需要使用所需的参数调用命令：

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

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

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

（您需要定义一个名为 的变量$password）