Bonjour,
je viens de commencer il y a quelques jours la programmation en Perl. Je souhaite en effet reprendre le script de Raditha Dissanyake pour faire un upload de fichier en PHP avec une barre de progression.
Je travaille sur windows dans un environnement local (easyPHP + ActivePerl 5.8).
Voici l'erreur 500 que me renvoit systématiquement Apache (error.log) :
Et voici mon script Perl (test.cgi) simplifié au maximum :[error] [client 127.0.0.1] can't open numfile: /tmp/test001! at c:\\PROGRA~1\\EASYPH~1\\www\\AIRLIQ~1\\cgi-bin\\test.cgi line 7.\n
J'ai d'abord pensé à un problème d'accès mais j'ai absolument tout les droits.#!C:/Perl/bin/perl.exe
use CGI;
use Fcntl qw(EFAULT :flock);
use File::Temp qw/ tempfile tempdir /;
$monitor_file = "/tmp/test001";
sysopen(FH, $monitor_file, O_RDWR | O_CREAT | O_WRONLY | O_EXCL, 0777)
or die "can't open numfile: $monitor_file!";
Savez-vous comment je pourrais résoudre ce problème ?
Merci d'avance
Partager