print substr($num, 0, 1);