{"id":751,"date":"2008-10-31T23:51:22","date_gmt":"2008-11-01T03:51:22","guid":{"rendered":"http:\/\/adterrasperaspera.com\/blog\/?p=751"},"modified":"2013-11-13T04:51:22","modified_gmt":"2013-11-13T09:51:22","slug":"random-perl-how-to-check-if-something-is-a-number","status":"publish","type":"post","link":"https:\/\/adterrasperaspera.com\/blog\/2008\/10\/31\/random-perl-how-to-check-if-something-is-a-number\/","title":{"rendered":"Random Perl: How to check if something is a number"},"content":{"rendered":"<p>Perl has no built in function or sub to test if a variable is a number or not. <code><a href=\"http:\/\/search.cpan.org\/~gbarr\/Scalar-List-Utils-1.19\/lib\/Scalar\/Util.pm\">Scalar::Util<\/a><\/code> makes it easy, and is a core module as well.<\/p>\n<pre><code>\r\nuse Scalar::Util qw(looks_like_number);\r\n\r\nmy $number = 192;\r\nmy $string = '123foobarbazquux123';\r\n\r\nif(looks_like_number($number)) {\r\n  print \"$number is a number!\\n\";\r\n}\r\n\r\nif(!looks_like_number($string)) {\r\n  print \"$string is not a number!\\n\";\r\n}\r\n<\/code><\/pre>\n<p>Tada!<\/p>\n","protected":false},"excerpt":{"rendered":"<p>Perl has no built in function or sub to test if a variable is a number or not. Scalar::Util makes it easy, and is a core module as well. use Scalar::Util qw(looks_like_number); my $number = 192; my $string = &#8216;123foobarbazquux123&#8217;; if(looks_like_number($number)) { print &#8220;$number is a number!\\n&#8221;; } if(!looks_like_number($string)) { print &#8220;$string is not a [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":[],"categories":[405],"tags":[],"_links":{"self":[{"href":"https:\/\/adterrasperaspera.com\/blog\/wp-json\/wp\/v2\/posts\/751"}],"collection":[{"href":"https:\/\/adterrasperaspera.com\/blog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/adterrasperaspera.com\/blog\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/adterrasperaspera.com\/blog\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/adterrasperaspera.com\/blog\/wp-json\/wp\/v2\/comments?post=751"}],"version-history":[{"count":5,"href":"https:\/\/adterrasperaspera.com\/blog\/wp-json\/wp\/v2\/posts\/751\/revisions"}],"predecessor-version":[{"id":2264,"href":"https:\/\/adterrasperaspera.com\/blog\/wp-json\/wp\/v2\/posts\/751\/revisions\/2264"}],"wp:attachment":[{"href":"https:\/\/adterrasperaspera.com\/blog\/wp-json\/wp\/v2\/media?parent=751"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/adterrasperaspera.com\/blog\/wp-json\/wp\/v2\/categories?post=751"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/adterrasperaspera.com\/blog\/wp-json\/wp\/v2\/tags?post=751"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}