$ob->write(chr($x*10));
# or
$ob->write(pack("C", $x*10));