Pourquoi le mutt échoue-t-il lorsque je l'appelle depuis mon script Perl CGI?

Question

J'ai développé une base de données avec l'utilisation de Perl CGI avec C++. J'ai un problème en envoyant les résultats au courrier. J'ai utilisé le code suivant:

print LOG "[",`date`,"] Sending mail to $email\n"; 
system (qq{mutt -s "MMM" -a $zip_file $email < $job_id}); 
if ($? == 0) { 
     print LOG "[",`date`,"] Sending mail to $email :: SUCCESS ::\n"; 
}else { 
     print LOG "[",`date`,"] Sending mail to $email :: FAILED ::\n"; 
} 

close LOG; 

Answer 1

Quelle erreur voyez-vous? En particulier, quelle est dans $!?

Il se pourrait que le processus CGI ne peut pas exécuter Mutt - comment sur la connexion de userid du script et le chemin actuel:

print LOG getpwuid($<) . "\n"; 
print LOG $ENV{PATH} . "\n"; 

est l'emplacement de l'exécutable de Mutt dans le chemin, et est-ce que l'utilisateur (probablement « apache ') avez-vous la permission de l'exécuter?

Answer 2

Vous pouvez également utiliser le module Net :: SMTP, qui communiquera directement avec le serveur de messagerie au lieu de dépendre des outils du système. C'est une solution plus portable, et évite l'ensemble des problèmes d'autorisations.

Answer 3

Voir mes Troubleshooting Perl CGI scripts. Si cela ne résout pas votre problème, il vous aidera au moins à développer votre question afin que vous puissiez obtenir plus d'aide. Vous pouvez également aimer brian's Guide to Solving Any Perl Problem.