use Scalar::Util qw( looks_like_number ); die("Invalid amount of Gil \"$gil\"\n") if !looks_like_number($gil); die("Invalid character name \"$char\". " ."It must only contain letters [a-z])\n") if $char !~ /^[a-zA-Z]+\z/;
In reply to Re: Checking for Number or String
by ikegami
in thread Checking for Number or String
by Lennent
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |