#!/usr/bin/perl

use XML::RSS;

my $description = "<b>How do I get this to be CDATA?</b>";

my $rss = new XML::RSS (output=>'2.0');

$rss->channel(
        title           => "Sample RSS Feed",
        'link'          => "http://www.somewhere.com",
        description     => "Example Feed",
);

$rss->add_item(
	title   => "Test",
	'link'  => "http://www.testitem.com",
	description => $description,
);

print $rss->as_string();

##</code><code>##

...

<item>
<title>Test</title>
<link>http://www.testitem.com</link>
<description>&#x3C;b&#x3E;How do I get this to be CDATA?&#x3C;/b&#x3E;</description>
</item>
...


##</code><code>##

<code>
...

<item>
<title>Test</title>
<link>http://www.testitem.com</link>
<description><![CDATA[[<b>How do I get this to be CDATA</b>]]></description>
</item>
...