open($fh_out, '<', $qfn_out)

##</code><code>##

open($fh_out, '>', $qfn_out)