use v5.20; use experimental 'lexical_subs'; use Scalar::Util (); my sub looks_like_number = \&Scalar::Util::looks_like_number; ... looks_like_number($x) ...