.....
my $temp = $object->some_recursive_call;
$value = $temp if $temp > $value;
.....