问个perl的 函数调用 （外部search.pl文件执行） 问题

不知道 执行 权限哪有问题? 请高手看看吧
路径 /var/www/html/perl.mycgi      
$filename = 'radomsearch.bat';
$command = 'perl radomsearch.bat';
chdir $cufld or die "error: $!\n";
if(-e $filename){
$c="ファイルあるよ";
system ("$command");
}else{
}

###
#radomsearch.bat 内容  -> mkdir test

#!/usr/bin/perl

$filename = 'radomsearch.bat';
$command = "perl";
$upfld = '../../';

chdir $upfld or die "error: $!\n";
if(-e $filename){
system("sudo -u root $command $filename");
}else{
$c="file not exist";
}

# visudo

# User privilege specification
root ALL=(ALL) ALL
apache ALL = NOPASSWD: /usr/bin/rsync
允许 Nobody 用户 的 执行权 没有 好像是这么回事
现在可以 执行了 还是谢谢回答 我问题的 朋友。