if (1 .. $not_default =~ /^$/) { do this ; }