次の変数を解決するのに助けが必要です${$mapusers[$index]->[1]}
以下を参照してください... find を出力します。しかし、system($query_user) を実行すると、変数は空になります。
my $query_user = 'adquery user -w ${$mapusers[$index]->[1]}';
次の変数を解決するのに助けが必要です${$mapusers[$index]->[1]}
以下を参照してください... find を出力します。しかし、system($query_user) を実行すると、変数は空になります。
my $query_user = 'adquery user -w ${$mapusers[$index]->[1]}';
"
の代わりに使用'
:
my $query_user = "adquery user -w ${$mapusers[$index]->[1]}";
system($query_user);
または、それが機能しない場合は、これを試してください。
my $query_user = "adquery user -w " . $mapusers[$index]->[1];
system($query_user);
$mapusers[$index]->[1]
がスカラー参照の場合は最初のものを使用$mapusers[$index]->[1]
し、参照でない場合は 2 番目のものを使用する必要があります。
コマンドの stdout をキャプチャする場合は、readpipe
代わりに をsystem
使用するか、バッククォート演算子を使用します。
コマンドを実行してadquery
その出力を に保存する場合は、バッククォートまたは$query_user
を使用します。qx
my $query_user = `adquery user -w ${$mapusers[$index]->[1]}`;