--- Font-TTF-1.04/lib/Font/TTF/OldCmap.pm~	2014-01-10 02:09:34.000000000 +0000

+++ Font-TTF-1.04/lib/Font/TTF/OldCmap.pm	2014-03-07 08:27:31.007184699 +0000

@@ -269,7 +269,7 @@

             for ($j = 0; $j < $num; $j++)

             {

                 $delta = $segs->[$j]{'VAL'}[0]; $flat = 1;

-                for ($k = $k < $segs->[$j]{'LEN'}; $k++)

+                for ($k = 1; $k < $segs->[$j]{'LEN'}; $k++)

                 {

                     if ($segs->[$j]{'VAL'}[$k] == 0)

                     { $flat = 0; }