--------------------
ASCII=i
Character=i
Decimal=970
Hexidecimal=3CA
Entity name=
Decription=i with an umlaut
--------------------
ASCII='
Character='
Decimal=39
Hexidecimal=27
Entity name=
Decription=quote
---------------------
ASCII=<
Character=<
Decimal=60
Hexidecimal=3C
Entity name=lt
Decription=less than
--------------------
.... truncated

##</code><code>##

open IN, "$myfile";
{
    local $/;
    $str = <IN>;
}
close IN;
%hash = reverse ($str =~ m/ASCII\=(.*?)\s+Character\=(.*?)\s+/g);