class RDoc::Parser::PerlPOD

def filter(comment)

proper parser to cope with C<<...>> etc
filtering. Only basic for now. Will probably need a
Filter the perl markup that does the same as the rdoc 
def filter(comment)
  return '' if comment =~ /^=pod\s*$/
  comment.gsub!(/^=pod/, '==')
  comment.gsub!(/^=head(\d+)/) do
    "=" * $1.to_i
  end
  comment.gsub!(/=item/, '');
  comment.gsub!(/C<(.*?)>/, '<tt>\1</tt>');
  comment.gsub!(/I<(.*?)>/, '<i>\1</i>');
  comment.gsub!(/B<(.*?)>/, '<b>\1</b>');
  comment
end