in reply to How to extract the first elemnet from an integer type value ???

print substr($num, 0, 1);

[download]

See substr

--
b10m

All code is usually tested, but rarely trusted.
  • Comment on Re: How to extract the first elemnet from an integer type value ???
  • Download Code

In Section Seekers of Perl Wisdom