http://www.perlmonks.org?node_id=634141


in reply to Re^3: Displaying RTF string to browser
in thread Displaying RTF string to browser

ok, tried that, and a few variations, I don't get a error so thats a plus, but I get a blank RTF not sure why though. not to familuar with creating streaming rtf.

Replies are listed 'Best First'.
Re^5: Displaying RTF string to browser
by bart (Canon) on Aug 21, 2007 at 21:12 UTC
    I installed RTF::Writer just to test your code, and after some edits I could make it compile. (For some reason, add_bgcolor isn't a recognized method, so I commented those out; and the use of your private module at the top too.)

    I initially got a blank file too. Then I noticed you have mixed two alternatives, you have to use either

    $fh = RTF::Writer->new_to_file($rtfReport);
    or
    $fh = RTF::Writer->new_to_string(\$RTF_obj);
    but not both. Don't mix them.

    For this application, it makes most sense to use the $RTF_obj, because it holds the entire RTF document in memory.

    And delete the line

    $fh->print(\$RTF_obj);
    near the end, it makes the document exactly twice as long and worse, it corrupts it as Word can no longer read it.

    So: near the top, just use

    $fh = RTF::Writer->new_to_string(\$RTF_obj);
    you'd even better delete every mention of $rtfReport; and near the bottom, right under $fh->close();, add
    print $RTF_obj;

    That's it. Drop the code I gave you earlier to read out the contents of the file, as there is no longer a file, you don't need it. Instead, you're printing out the contents of a string.

    HTH.