x ++$x
y int(((log10 ($x/100 + 1)) + 3)*100)
z $x+$y+$z

##</code><code>##

$function_hash{"x"}="++$x";
$function_hash{"y"}="int(((log10 ($x/100 + 1)) + 3)*100)";
$function_hash{"z"}="$x+$y+$z";

##</code><code>##

$value_hash{"x"} = 10;
$value_hash{"z"} = 30;

##</code><code>##

$Alias::AttrPrefix = "main::";