Select Code to Download

    my $d = deferred->new;
    my $result = External::Parser->run( '--in', $file );
...
    ? $d->resolve( $result )
    : $d->reject();
    $d->promise;