# See if we need to calculate refresh matrix, based on user options
if ($qeneral_user_options =~ /c/) {
    # This branch was NOT being taken, contrary to expectations
    print "Options contains 'c'\n";
    calculate_refresh_matrix();
}
# Debugging code added to find bug
else {
    print "Value of \$general_user_options = '$general_user_options'\n";
}

##</code><code>##

    Value of $general_user_options = 'cde'