Select Code to Download

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

sub promise {
  my ($to_tie, $implement, $opts);
...
  elsif (UNIVERSAL::isa($to_tie, 'HASH')) {
    ...
}