L
####
C:\STRAWB~1\perl\bin/pod2html.bat: ../test.pod: cannot resolve L in paragraph 6.
####
# some L<>'s that shouldn't be:
# a) full-blown URL's are emitted as-is
if( $par =~ m{^\w+://}s ){
return make_URL_href( $par );
}
# --- add this: ---
elsif( $par =~ m{^([^|]+)\|(\w+)://(.+)}s ) {
#link text in $1, scheme in $2, everything else in $3
return sprintf '%s', $2, $3, html_escape($1);
}
####
=over 1
=item bla
asdfghjk
=back
####
=over 1
=item
sdfsfgsdh
=back
####
if ($text =~ /\A(.+)\Z/s ){ # should have text
emit_item_tag( $otext, $text, 1 );
# write the definition term and close tag
print HTML "\n";
}
####
if ($text =~ /\A(.+)\Z/s ){ # should have text
emit_item_tag( $otext, $text, 1 );
}
# write the definition term and close tag
print HTML "\n";