CPAN::Groonga

14;
use warnings;

package Test::BDD::Cucumber::Harness::JSON 0.87;

=head1 NAME

Test::BDD::Cucumber::Harness::JSON - Generate results to JSON file

=head1 VERSION

version 0.87

=head1 DESCRIPTION

A L<Test::BDD::Cucumber::Harness> subclass that generates JSON output file.

So that it is possible use tools like
L<"Publish pretty cucumber reports"|https://github.com/masterthought/cucumber-reporti

ng>.

=cut

use Moo;
use Types::Standard qw( Num HashRef ArrayRef FileHandle );
use JSON::MaybeXS;
use Time::HiRes qw ( time );

extends 'Test::BDD::Cucumber::Harness::Data';

=head1 CONFIGURABLE ATTR

le is a very small wrapper around the
L<gherkin-languages.json|https://github.com/cucumber/cucumber/blob/master/gherkin/gherkin-languages.json>
file from L<Gherkin|https://github.com/cucumber/cucumber

ntent from
# https://raw.githubusercontent.com/cucumber/cucumber/master/gherkin/gherkin-languages.json
#
# Refresh with:
#
#   scripts/update-i18n
#

our %languages = ('af',{'and','En ','background','

 if a language is supported.  Takes as argument the language
abbreviation defined in C<share/i18n.json>.

=cut

sub has_language {
    my ($language) = @_;
    return exists $Test::BDD::Cucumber::I18N

et definition of a language.  Takes as argument the language abbreviation
defined in C<share/i18n.json>.

=cut

sub langdef {
    my ($language) = @_;

    return unless has_language($language);
    r