发现在linux系统下运行perl脚本的run函数有问题，请问该怎么解决？

Question

my $res = run( [ 'sudo -u cis /ccrun/bin/dumpUnitPats', $unitID, $staffID ], \$input, \$output, \$str);
本意是用run用sudo 以cis用户执行dumpProviderPats命令
提示 file not found: sudo -u cis /ccrun/bin/dumpUnitPats
该如何实现
run 是IPC::run

Answer 1

应该是['sudo','-u','cis','/ccrun/bin/dumpUnitPats', $unitID, $staffID ]吧，错误提示明显是把整个‘sudo -u cis /ccrun/bin/dumpUnitPats’语句当做一个文件了

Answer 2

Backtick: `, not Apostrophe [ ' ]`sudo -u cis /ccrun/bin/dumpUnitPats`sub run {my $sudo = shift;## Did you de-reference it?${$sudo}[0];}