如何在Perl的系统()中使用bash语法？

my @args = ( "bash","-c","diff <(ls -l) <(ls -al)" );
system(@args);

你甚至可以定义一个子程序,如果你打算这么做的经常：

sub system_bash {
  my @args = ( "bash",shift );
  system(@args);
}

system_bash('echo $SHELL');
system_bash('diff <(ls -l) <(ls -al)');