I see the 111 row and this is the code

  else {
        my($fW,$fH) = (GD::Font->Small->width, GD::Font->Small->height
+);
        my $iWidth = length($sPtn);
        #Bar Image
        ($oGd, $cBlack) = GD::Barcode::plot($sPtn, $iWidth, $iHeight, 
+$fH, 0);

        #String
        $oGd->string(GD::Font->Small, (length($sPtn)-$fW*(length($sTxt
+Wk)))/2, $iHeight - $fH,
                        $sTxtWk, $cBlack);
  }
[download]

As you see on code there is a GD::Font setting. Is for this question wich I search GD::Font module, but I doesn't exist on CPAN site. :(