perl中怎么把小数转换成百分数???????谢谢

perl中怎么把小数转换成百分数???????谢谢

perl中怎么把小数转换成百分数???????谢谢
perl中怎么把小数转换成百分数???????

非常谢谢!!!
本人会了!!!
$x=5;
$y=7;
$z= ($x/($x+$y))*100;
$g = int $z;
print "g=$g%";