note davido <p>Are you trying to do something like this?</p> <c> open my $fh, '>', 'outfile.txt'; test_and_write( $fh ); sub test_and_write { my $handle = shift; if( rand() > .5 ) { close $handle; return; } else { print $handle "Still open.\n" return 1; } } </c> <p>It's possible. Maybe not a great separation of concerns, but possible.</p> <p>If that's not what you're asking, read your question back to yourself and see if it makes sense to you, because it's a little opaque to me.</p> <div class="pmsig"><div class="pmsig-281137"> <br /><p>Dave</p> </div></div> 1003947 1003947