> I would like to make a file read-only, but only if no other process > currently has it open. I had hoped that setting the read-only attribute > > if ( Win32::File::SetAttributes( $file, READONLY ) ) { ... } > Try this: if ($fh = Win32API::File::createFile( $file, 'r', '' ) ) { # no one else has the file open } else { # someone does } _______________________________________________ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs