style results from the CPAN

Algorithm-HowSimilar
<HTML>
<HEAD>
<TITLE>HowSimilar.pm</TITLE>
<LINK REL="stylesheet" HREF="../html/docs.css" TYPE="text/css">
<LINK REV="made" HREF="mailto:">
</HEAD>

<BODY>
<TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0 WIDTH=100%>
<TR><TD CLASS=block VALIGN=MIDDLE WIDTH=100% BGCOLOR="#cccccc">
<FONT SIZE=+1><STRONG><P CLASS=block>&nbsp;HowSimilar.pm</P></STRONG></FONT>
</TD></TR>
</TABLE>

<A NAME="__index__"></A>
<!-- INDEX BEGIN -->

<UL>

    <LI><A HREF="#name">NAME</A></LI>
    <LI><A HREF="#synopsis">SYNOPSIS</A></LI>
    <LI><A HREF="#description">DESCRIPTION</A></LI>
    <LI><A HREF="#methods">METHODS</A></LI>
    <UL>

        <LI><A HREF="#compare( arg1, arg2, optional_callback )">compare( ARG1, ARG2, OPTIONAL_CALLBACK )</A></LI>
        <LI><A HREF="#export">EXPORT</A></LI>
    </UL>

    <LI><A HREF="#author">AUTHOR</A></LI>
    <LI><A HREF="#see also">SEE ALSO</A></LI>
</UL>
<!-- INDEX END -->

<HR>
<P>
<H1><A NAME="name">NAME</A></H1>
<P>Algorithm::HowSimilar - Perl extension for quantifying similarites between things</P>
<P>
<HR>
<H1><A NAME="synopsis">SYNOPSIS</A></H1>
<PRE>
  use Algorithm::HowSimilar qw(compare);
  @res = compare( $str1, $str2, sub { s/\s+//g; [split //] } );
  @res = compare( \@ary1, \@ary2 );</PRE>
<P>
<HR>
<H1><A NAME="description">DESCRIPTION</A></H1>
<P>This module leverages Algorithm::Diff to let you compare the degree of sameness
of array or strings. It returns a result set that defines exactly how similar
these things are.</P>
<P>
<HR>
<H1><A NAME="methods">METHODS</A></H1>
<P>
<H2><A NAME="compare( arg1, arg2, optional_callback )">compare( ARG1, ARG2, OPTIONAL_CALLBACK )</A></H2>
<P>You can call compare with either two strings compare( $str1, $str2 ):</P>
<PRE>
    my ( $av_similarity,
         $sim_str1_to_str2,
         $sim_str2_to_str1,
         $matches,
         $in_str1_but_not_str2,
         $in_str2_but_not_str1
( run in 0.486 second using v1.01-cache-2.11-cpan-e1769b4cff6 )