well, this does it for you
while (<F>) {
+ next if (/^#/);
# prevent double utf-8 encode by XML::RSS
$_ = decode_utf8($_) if ($charset eq 'utf-8') ;
if (/^<p><strong>(.*)<\/strong>(?:<br \/>)?\s*(.*)/) {
--
victory
no need to CC me :-)
http://userscripts.org/scripts/show/102724