Somebody set us up the google!!
RTF::Document
documentation
Code Sample from POD :

    use RTF::Document;
    # Document properties
    $rtf = new RTF::Document(
      {
        doc_page_width => '8.5in',
        doc_page_height => '11in'
      }
    );


    $rtf->add_text( $rtf->root(),
       "Default text\n\n",


       { bold=>1, underline=>continuous },
       "Bold/Underlined Text\n\n",


       { font_size=>'20pt', font=>$fCourier,
         color_foreground=>$cRed },
       "Bigger, Red and Monospaced.\n\n",


       { style_default=>paragraph },
       { style_default=>character },


       "This is ",
       [ { style=>$sGreen }, "green" ],
       " styled.\n\n"
[download]

but, it doesn't appear to be in CPAN, so it could set your computer on fire, or sell guns to kids. If you find a pile of ashes where your computer was, or if a 5 year old shoots you, don't blame me...
Actually, it looks pretty complete. But I had to throw in the warning. Update 28MAR2001 this module's in CPAN now. Its documentation still appears to be missing.