| Subject: | Bug in 02readwrite.t on Win32 |
The following code fails because cmd.exe (on my Windows 2000 box) is
not in the specified location:
if($^O eq 'MSWin32'){
system "C:\\Windows\\System32\\cmd.exe \/c del t\\logfile2";
}else{
unlink $logfile;
}
Even if I replace "Windows" with "WINNT" so that cmd.exe gets found,
it still fails with the message "The process cannot access the file
because it is being used by another process".
However, the test script ran fine for me (in the sense that no errors
occurred) if I changed the above code to:
#if($^O eq 'MSWin32'){
# system "C:\\Windows\\System32\\cmd.exe \/c del t\\logfile2";
#}else{
unlink $logfile;
#}
Of course, logfile2 did not get removed ... it is, after all,
apparently "being used by another process" :-)
Do you really need to have it removed ?
I'm using MinGW-built perl 5.8.8, btw.
Cheers,
Rob