if ( !$opt_s ) {
    $LOGFH->print(q{-} x 50, "\n") or carp 'Could not print to log.';
    close $LOGFH or croak "Could not close the logfile: $!";
}