sub do_logging { my ($rescode, $browsecode, $summarycode) = @_; ResCode( $rescode ); BrowseCode( $browsecode ); NewLine(); SummaryCode( $summarycode ); } if ( readFileContents( $lofFile, $ContentsLoadMsg ) == $FALSE ) { do_logging( 'E_LOADMSG_ERROR', 'Could not open "$logFile"', 'E_MISLOAD_ERROR' ); return $FALSE; }