特别是在中小字号的时候会发生~怎么回事~

我也注意到了,nightly有这个问题,我干脆把我生成粗体的perl代码段贴在这里,其中@ftdata是一个0-1数组,格式如下shooter 写了:dapper+nightly+firefox
特别是在中小字号的时候会发生~怎么回事~
代码: 全选
$count=0;
for(my $k=0;$k<@ftdata;$k++) # 从ftdata一次取一行
{
if($ftdata[$k]=~ /^[01]/) #如果是0或者1开头
{
$t=$ftdata[$k];
chop($t); #去掉最后的回车
$t .= "0" x (16-length($t)); #如果不足16个字符用0补全
print { $filehd[$j] } sprintf("%04X",bin2dec($t)); # 将正常体用hex格式输出到文件
$t =~ s/1./11/g; #算法加粗
print { $filehd[$j+4] } sprintf("%04X",bin2dec($t)); #将粗体用hex输出到文件
$count++;
}
if($count>=$bbxw[$j]) {last;}
}
print { $filehd[$j] } "\n";
print { $filehd[$j+4] } "\n";