sub what_next {
  my ($kernel, $job) = @_;
  my $next_step = shift @{ $job->{recipe} };
  if (defined $next_step) {
    $kernel->yield( $next_step => $job );
  }
  else {
    $kernel->yield( 'process_next_input' );
  }
}