html => {
-start => qq~
HTML: |
~.
qq~~,
-end => qq~ |
~,
-string => \&PBoard::Posting::HighlightHtml,
},
sql => {
-start => qq~~,
-string => \&PBoard::Posting::HighlightSql,
},
# different link types
cpan => {
-start =>
' ",
-string => sub {
my $url = &HTML::Entities::encode_entities($_[0]);
return $url . ';mode=all">CPAN: ' . $url;
},
},