in reply to How to extract the first elemnet from an integer type value ???
print substr($num, 0, 1); [download]
See substr