my $template_href = Business::LetterWriter::get_hashref_from_template_file("./CL_TEMPLATE_DE.txt");

    my $json = JSON->new->utf8(0)->pretty(1);
    my $letter_template_json = $json->encode($template_href);

    my $request 
        = "Here is a template letter in the JSON format: " . $letter_template_json .
        " Tailor each part to make the whole letter friendier less formal and very short. Return the tailored version of the letter strictly in JSON format. Do not explain anything." ;
    my $llm_answer_raw = Business::LetterWriter::get_one_answer_from_new_llm($request);
    my $template_href = $json->decode($llm_answer_raw);
    my %parms = (outfn => "outtest.txt");
    Business::LetterWriter::out_parts($template_href, \%parms);

USAGE:
    use strict;
    use JSON;
    use lib '../Business-LetterWriter/lib/';
    use Business::LetterWriter;

    my $template_href = Business::LetterWriter::get_hashref_from_template_file("./customer_req/LETTER_TEMPLATE_DE.txt");
    my $json = JSON->new->utf8(0)->pretty(1);
    my $letter_template_json = $json->encode($template_href);

    my $customer_req_fn = "./customer_req/requirement_1.txt";
    open my $customer_req_fh, "<:encoding(UTF-8)", $customer_req_fn;
    my $customer_req_text = do{local $/; <$customer_req_fh>};

    # binmode(STDOUT, ":encoding(UTF-8)");  # stdout is UTF-8
    # print $customer_req;
    # exit;

    my $request 
        = "Here is a template letter in the JSON format: " . $letter_template_json .
        "Here is requirement of the company: " . $customer_req_text .
        " Tailor each part of the template letter to make the whole letter fit to the customer requirement. Return the tailored version of the letter strictly in JSON format. Do not explain anything." ;

    my $llm_answer_raw = Business::LetterWriter::get_one_answer_from_new_llm($request);

    my $template_href = $json->decode($llm_answer_raw);

    # Business::LetterWriter::out_parts($template_href, {outfn => "TAILORED_VERSION.txt"});
    my $metha_file_path_name = "./Customers/MyCustomer/META.txt";
    my $address_hashref = Business::LetterWriter::generate_meta_hashref_from_file($metha_file_path_name);
    my %combined_hash = ( %{$address_hashref} , %{$template_href});

    Business::LetterWriter::replace_in_docx("template.docx", "./my_results.docx", \%combined_hash);