my $IsNumber = '/^\d+$/';

##</code><code>##

$rValue = "$IsNumber";

##</code><code>##

$rValue = $$rValue
$rValue = `eval $rValue`