Maybe you want something like this:

if ( defined fileno $handle ) {
    $result = flock $handle, LOCK_EX | LOCK_NB;
    }
[download]