promise(\ my $result_of_long_compute, sub {
  # Long computation here
});