https://www.manu.co.in/how-do-i-tell-if-a-variable-has-a-numeric-value-in-perl/