如何使用變量執行Perl qx函數

Question

如何使用我的$opt變量執行Perl的qx函數？

之前（的作品）：

my @df_output = qx (df -k /tmp); 

我想請使用-k，-g，或-H：

my @df_output = qx (df -$opt /tmp); 

Answer 1

你有什麼應該工作，但：永遠不要使用qx。這是古老而危險的;無論您是否通過殼體進行操作，所以如果/bin/sh不是您所期望的，那麼容易受到殼體注射的影響或碰到意外。

使用open()的多參數形式，它完全繞過了shell。

open my $fh, '-|', 'df', "-$opt", '/tmp' or die "Can't open pipe: $!"; 
my @lines = <$fh>; # or read in a loop, which is more likely what you want 
close $fh or die "Can't close pipe: $!"; 

Answer 2

嘗試使用反斜槓\$opt，它的工作原理。