perl eval with back quote

Question

私はperlスクリプトをPythonに変換していましたが、私は理解できないこの関数を発見しました。

sub set_xyz_hash { 
    %xyz =(); 
    $_ = join(' ', map { my $a = $_; $a =~ s/\'/\'\"\'\"\'/g; "'$a'" } @ARGV); 
    eval `XYZ_ARG0='$0' NZENV_OUTPUT='-a -p xyz' xyz $_`; 
} 

Perlでの私の知識は非常に限られているため、私は、この機能で使用される「evalの」をを理解することができませんでした。誰かが私をここで助けてくれますか？

注、evalはwth `（バッククォート）です。

Answer 1

バッククォートは、外部コマンドを実行し、出力を返す：それは基本的にの出力からいくつかのPerlソースをフェッチだ

my $result = `XYZ_ARG0='$0' NZENV_OUTPUT='-a -p xyz' xyz $_`; 
eval $result; 

：

my $result = `ls -l`; 
print $result; 

あなたevalラインがまったく同じように処理され、呼び出されたスクリプトを実行して実行します。