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 -- To UNSUBSCRIBE, email to [email protected] with a subject of "unsubscribe". Trouble? Contact [email protected] Archive: http://lists.debian.org/[email protected]
