Select Code to Download

--------------------
ASCII=i
...
Decription=less than
--------------------
.... truncated

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