On Fri, Nov 12, 2004 at 03:46:36AM -0000, Steve Peters via RT wrote:

> [EMAIL PROTECTED] pi_test $ perl -pi- -e'exit' test
> Can't rename test to test-: Permission denied, skipping file.
> It seems to have been fixed somewhere prior to Perl 5.8.5.

That didn't duplicate the steps that led to the original problem.  The
problem is not when the initial rename fails or file create fails,
it's when a subsequent write fails.

I just tried it under 5.8.5, and it still happens.  Example:

[EMAIL PROTECTED]:/mnt 05:30:13 1061# dd if=/dev/zero of=bar bs=1024
count=700
700+0 records in
700+0 records out
[EMAIL PROTECTED]:/mnt 05:30:46 1062# df -k .
Filesystem           1k-blocks      Used Available Use% Mounted on
/root/foo                 1003       717       235  75% /mnt
[EMAIL PROTECTED]:/mnt 05:30:50 1063# ls -l
total 716
-rw-r--r--   1 root     root       716800 Nov 12 05:30 bar
drwxr-xr-x   2 root     root        12288 Nov 12 05:29 lost+found
[EMAIL PROTECTED]:/mnt 05:30:55 1064# perl -pi~ -e 1 bar
[EMAIL PROTECTED]:/mnt 05:31:12 1065# echo $?
0
[EMAIL PROTECTED]:/mnt 05:31:16 1066# ls -l
total 999
-rw-r--r--   1 root     root       286720 Nov 12 05:31 bar
-rw-r--r--   1 root     root       716800 Nov 12 05:30 bar~
drwxr-xr-x   2 root     root        12288 Nov 12 05:29 lost+found

- Morty

Reply via email to