Select Code to Download

use Exporter 'import';
our (@EXPORT_OK, %EXPORT_TAGS);
...
        all  => [@all],
    );
}

if( ! _write_to_filehandle($FH, $contents) ){ warn "error, call to ".'
+_write_to_filehandle()'." has failed"; close $FH; return undef }

if( ! _write_to_filehandle($FH, $contents) ) { 
    warn "error, call to ".'_write_to_filehandle()'." has failed"; 
    close $FH; 
    return undef;
}