view release on metacpan or  search on metacpan

t/encoding-rss.t  view on Meta::CPAN

my $rss = <<'EOT';
<?xml version="1.0" encoding='UTF-8'?>
<rss version="2.0">
   <channel>
      <title>Foo &amp; Bar</title>
      <link>https://alexschroeder.ch/</link>
      <pubDate>Mon, 13 Jan 2020 23:16:01 +0100</pubDate>
      <item>
         <title>السّلام عليك</title>
         <link>http://hello/wiki?user=Alex&amp;lang=ar</link>
         <description>&lt;style&gt;some CSS, I guess&lt;/style&gt;&lt;em&gt;D&amp;D&lt;/em&gt; is not bad!&lt;br&gt;You'll like &lt;span class='p-name'&gt;Foo &amp; Bar&lt;/span&gt;.</description>
         <author>&lt;span class='p-author h-card'&gt;Alex Schroeder&lt;/span&gt;</author>
      </item>
   </channel>
</rss>
EOT

start_daemon(encode_utf8 $rss);

Jupiter::update_cache("test-$id/rss2sample.opml");