develooper Front page | perl.perl5.porters | Postings from July 2003

Re: [PATCH] test clean-up for VMS

Thread Previous | Thread Next
Craig A. Berry
July 20, 2003 08:43
Re: [PATCH] test clean-up for VMS
Message ID:
Michael G Schwern wrote:
>>-  unlink @files;
>>+  for $f (@files) { close $f; 1 while unlink $f; }
>> }
> Any reason this couldn't be written:  1 while unlink @files; ?

I was trying to make explicit the fact that multiple versions of each
file may need to be deleted. On reflection my formulation doesn't really
communicate anything that the simpler "1 while unlink" is missing.

> Does it make any sense to close() a filename?

Well, it doesn't to Perl, and I don't know why it did to me when I wrote
it. Obviously that has to go.

Another version of the patch is attached with these issues corrected.

Thread Previous | Thread Next Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at | Group listing | About